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VERSION BO J. MAR. 64 ANTHONY HART 

THE FOLLOWING MODIFICATIONS HAVE BEEN MADE TO THE OLD C/DhvA; 

THE HARDWARE QUfSTION "TYPE i)r LOOPBACK'" HAS BEEN ALTERED TO INCLUDE THE 
STAGGERED LOOPBACK CONNECTORS ON THE DHUll DISTRIBUTION PANEL (H5029). 

THE HARDWARE QUCSTTON "BR LEVEL" HAS BEEN REMOVED. 

THE MODEM SIGNAL TESTS THAT WERE IN THE OLD VERSION (C/DHVAO) HAVE ^^0W 
BEEN REMOVED TO PMiJ C^DHW. fHEY WERE TESTS: 16 THRU 23. IN C^OHVAO. 

THE FOLLOWING NEW TESTS HAVE BEEN ADDED TO THIS PARTi 
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TEST 15 - TX FIFO TEST " 
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1.0 GFNERAL PROGRAM CONSIDERATIONS 

1.1 PROGi^AM ABSTRACT 

CZDHVBO IS PART OF THE DHU-ll ruNCTIONAL VERIFICATION TELT. 
THIS PART OF THE TEST VERIFIES THAT THE MAJOR COMMUNICATIONS 
Flt^CTIONS OF THE BOARD ARE FUNCTIONING CORRECTLY. THIS PROGRAM 
DOES NOT PERFORM EXTENSIVE DATA TRANSMISSION AND RECEPTION TESTS 

THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
RUNTIME SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE 
THE INTERFACE TO THE OPERATOR AND TO THE SOFTWARE ENVIRONMENT. 
THIS PROGRAM CAN BE USED WITH XXOP.. ACT, APT. SLIDE AND PAPER 
TAPE. FOR A COMPICTE DESCRIPTION OF THE RUNTIME SERVICES. REFER 
TO THE XXDP» USER'S MANUAL . THERE IS A BRIEF DESCRIPTION OF 
THE RUNTIME SERVICES IN THE OPERATING INSTRUCTIONS-COMMANDS 
OF THIS DOCUMENT, 



THE FOLLOWING HARDWARE IS REQUIRED TO PUN THE DHU fVT: 

UNIBUS PROCESSOfi WITH AT LEAST 32K BTTES Oh MEMORY. 

DHU BOARDS INbTALLtO ON THE iJ^IBUS. 

APPROPRIATE PROGRAM LOAD DEVICE SL-PPORTING XXDP* 
MEDIA OR A DOUM LINE LOADING SYSTEM, 

1.5 REuATED DOCUMENTS AND STANDARDS 

A.XDP* USER'S MANUAL DESCRIBES THt RUNNING UF DIAGNOSTICS 
vriOt.R *^!-<f XXDPt MONITOR. 

l.d D.iAGNQS"'lC HIERARCt PrtEREQUiSUf S 

THE PROCESSOR, THE UNIBUS, THfc bi^TfH Mf MOM l . THE QONSQL F TtRMINAl 
AND TH^ LO; . MEDIA ARE AS'.UMtD TO HiWt UEtN TLiiltD AND FUUND WOHIUNG 
BEFORE THIS -PROGRAM lU RUN. 



II 



p^8GF^Sri Bub'uA^i 
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^.0 OPbRATlNG iNSTRUCl IONS 



THIS SECTION 
KUR DETAILED 



CONTAINS A BRIEF DESCRIPTION OF 
INFORMATION, REFER TO THE XXDP* 



THE RUNTIME SERVICES, 
USSR'S MANUAL CCHQUS*). 



a, I COMMANDS 



THtRE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 
C SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY 
BRIEF DESCRIPTION OF THEM. THE XXDP* USER'S MANUAL HAS MORE DETAILS. 



COMMAND 

START 

RFSTART 

CONTINUE 

PROCEED 

EXIT 

ADD 

DROP 
PRINT 



DISPLA' 
FLAGS 
/H AGS 



EFFECT 



START THE DIAGNOSTIC FROM AN INITIAL STATE 

START THE DIAGNOSTIC WITHOUT INITIALIZING 

CONTIW.iE AT TEST THAT UAS INTERRUPTED (AFTER K^ 

CONTINUE FROM AN ERROR HALT 

RETURN ;0 XXOP» MONITOR (XXOP* OPERATION ONLyM 

ACTIVATE H UNIT FOR TESTINli (ALL UNITS ARE 

COISIOERED 10 BE ACTIVE AT START TIME 

DEACTIVATE A UNIT 

PRI^T STATISTICAL INFORMATION (IF IMPLEMENTED 

BY '^-^ DIAGNOSTIC - SEE PERFOMANCE AND PROGRESS 

REPORTS SECTION OF THIS OOCunENT) 

TrPt A LIST OF ALL DEVICE INFORMATION 

TfPE :hE state of ALL FLAGS ( SFF FLAGS SECTION) 

CLEAR ALL FLAGS (SEE FlAGS SkCTION^ 



A COMMAND CAN 81 RECOGNI/EO l\i THE FIRST 
lOUMAT, FOWtXAMPie, TYPt '^ TA " INSTEAD 
MORE INfORMATION CAN Bt FOUND WITHIN THE 
EXTENDED COMMAND IWNTAx 



THREE CMARACTFR'. 

0» "START . 

SEC f ION LABELlLD 



;o 
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c\^ SWiTCHtS 



TH^RE ARE S6VERA1 SWITCHES WhJCH ARE USED TO MOOirY SUPERVISOR OPERATION. 
THfcSE SWITCHES ARE APPENDED TO THf LEGAi. COMMANDS. ALL OE THE LEf-Al 
SWITCHES ARE TABULATED BELOW UITH A BRIEF DESCRIPTION OE EACH. 
IM THE DESCRIPIIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY "DDDOO". 

SWITCH EEFEC ' 

/TESTS:l 1ST 

/PASS:DDDOD 

/FLAGS;FL'"iS 

/FOP:DODD0 
/UNITSaiST 

EXAMPLE OE SWITC ''SAGE: 



EXECUTE ONLt THOSE TESTS SPECIFIED IN 
THE LIU. LIST IS A STRING OF TEST 
NUMBER!, FOR EXAMPLE - /TESTS: 1 :5: 7 - 10. 
THIS LIST WILL CAUSE TESTS 1 r..,b,9.l0 TO 
BE RUN. ALL OTHER TESTS ;-iLL NOT BE RLt;. 
EXECUTE DDODO PASSES ''JODDD • 1 TO 64000) 
SET SPECIFIED FLAGS. SEE THE FLAGS SECTION 
Of THIS DOCUMENT. 

MESSAGE AFTER EVERt 

(DODDD - 1 TO 64000) 
THOSE UNITS SPECIFIED 
EXAMPLE /UNITS:0:5:10 



REPORT END OF PASS 
DDDOO PASSES ONLl. 
TEST/ADO/DROP ONLY 
IN THE LIST. LIST 



l^ 



USE UNITS 0,5,10.11.12 (UNIT NUMBERS - 0-63) 



START/TESTS: I -5/PASS: lOOO/EOP: 100 

THE. EFFECT 0» THii .OMMAND WILL BF : l) TESTS I THROUGH ^ WIU. BE 
EXECUTED. H) ALL UNlTS WILL TESTED 1000 TIMRS A^:^ '> i Ht END 0*-^ 
PASS MESSAGES WILL BE PRINTED A'- TER EACH 100 PASSES ONLY. A 
SWITCH CAN BE RECOGNI/FO EiY THE FIRST THREE CHARACTERS. tOU MAi 
TOP EXAMPLE, TYPE '''TtS:l'5" INSTEAD 01- '^TESTS:! S-, 



BELOW IS 
COMMAND. 



A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED Bt EACH 



START 

RESTART 

CONTINUE. 

PROCEED 

DROP 

ADO 

PRINT 

DISPL AY 

FLAGS 

tXXT 



TEST 

X 
X 



PA^S 
X 

X 



Fl Abb 

X 

> 

X 



EOP 

.X 

X 

X 



UNITS 



Hi. 
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IT 

2.5 FLAGS 



FLAGS ARE UStD TO SET UP CERTAIN OfERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALL FLAGS APE CL-ARE[) AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING .HE FLAGS SWITCH. FLAGS 
ARE ALSO CLEARED AFTER A START C^JiMANO UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS COMMAND HAY ALSO BE USED TO CLEAR 
ALL FLAGS. WITH THE EXCEPTION 0^ THE START AND 2FLAGS COMMANDS, 
NO COMMANDS AFFECT THE STATE OF THE FLAGSi THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 

FLAG EFFECT 



HOE 


HALT ON 




RUNTIMt 


LOE 


LOOP ON 


UR* 


INHIBIT 


IBR* 


INHIBIT 




FIRST LI 




ERROR T 



ERROR CONTROL IS RETURNED TO 
SERVICES COMMAND MODE 
ERROR 

ALL ERROR REPOiU<^ 
ALL ERROR REPO^'TS EXCEPT 
LEVEL (FIRST LEVEL CONTAIN^' 
TYPE. NUMBER. PC. TEST AND L^IT) 
IXR* INHIBIT EXTENDED ERROR (REPORTS 'THOSE 

CALLED BY PRINTX MACRO'S) 
PRI DIRECT MESSAGES TO LINE PRINTER 

PNT PRINT TEST NUMBER AS TEST EXECUTES 

DOE -BELL" ON ERROR 

UAM UNATTENDED MODE (NO MANUAL INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS COOES NOl 

APPLY TO OIAGNOSTICS WHICH uO NOT SUPPORT 
STATISTICAL REPORTING) 
lOR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTOOROP CODE 

lOT LOOP ON TEST 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 

HAVE EVALUATION S'JPPORT ) 

*SEE THE ERROR INFORMATION SECTION OF THIS DOCuMLNT 

SEE THE XXDP* USER'S MANUAL f OR MORfc Ot TAU 'j ON K.AUS. »'")U MAt 
SPECiri MORE THAN ONE fLAG WITH THf HAG 'jWUCH. ^ OR E/AMPLF, 
TO CAUSE THE PROGRAM TO LOOP ON ERROR. XNhIQIT f PR 0.7 RM^ORT', 
AND TYPE A "Bill " ON fRHOR. YOU MAt USE THt FULLUWiN'i SfRlNU: 

/FUGS i LOE atRjBOt 



1 1, 
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.^.4 EXTENDED COMMAND SYNTAX 
.^4.1 START COMMAND 

ST A( RT )/ TESTS :' TEST -LIS T>/PAS^'.:'OAS5CNT»/ri. AGS: 

<KLAG-i.IST>/£OP:<INCR> 



iEQ 6 



;?. 4.1.1 TESTS SWITCH ( /TESTS: < TEST LIST O - 

<TE5T-LIi'T> IS A SEQUENCE OF OECIMA. NUMBERS (1:2 ETC.) OR RANGES 
Oy HECIilAL NU-^ERS (1-5:6-10 ETC.). SEPLRATEO BY COLONS. THAT SPECIFY 
THE TESTS TO BE EXECUTED. TESTS WILL BE EXECUTED IN NUMERICAL ORDER 
REGARDLESS OF THE ORDER OF SPECIFICATION. THE DEFAULT IS TO EXECUTE 
ALL TESTS. ON THIS AND ALL SWITCHES. THE ANGLE BRACKETS <» ARE 
PUNCTUATION USED IN THE DEFINITION Offl_Y, AND ARE NOT TO BE TYPED 8^ 
THE OPERATOR. SEE EXAMPLE AT END 01' "EFFECT OF START COMMAND" 
SECTION. 



?.4,1.2 PASS SWITCH ( /PASS: <PA5S -CNT* t - 

<PA5S-CNT> IS A V)ECIMAL NUMBER IM3ICATING THE DESIRED NUMBER OF 
PASSES. A PASS IS DEFINED AS THE £xECUTI0l>4 OF THE FULL DIAGNOSTIC 
(ALL SELECTED TESTS). T.HE DEFAULT IS NON-ENDING EXECUTION. IN THIS 

CASE. EXIT FROM THE PROGRAM IS ACCOMPLISHED EITHl-R Bt TiPING A 
CONTROL/C OR BY OCCURANCE OF AN ERROR WITH THE HALT ON ERROR FLAG 
BEING SET. THE EXIT IS A REHJRN TO COMMAND MODE. SEE EXAMPLE AT END 
0^ "EFFECT OF START COMhANO" SECTION. 



?.4.1.3 FLAGS SWITCH ( /FLAGS : <FLAG-LIST> ) 



'FLAG-LIST> IS A 
<.'-LAli-l>. OR <FLAG-0> 
THE FOLLOWING VALUES: 



SEUUcNCE OF ELEMENTS 
SEPARATED BY COLONS, 



Of THE fORM <ri AU>. 
WHERE <F'.AG^ HAS ONE UF 



HO- HALT ON ERROR, CAUSIt^ COMMAND MODE TO 

BE ENTERED WHEN AN ERROR 15 ENCCHJNTtRED . 

LOE LOOP ON ERROR. CHUSINC THE DIAGNO~.TIC TO 
LOOP CONTINUOUSLY WITHJN THE SMALLEST 
DEFINED BLOCK OF COOING ( SEGr«NT . SUBTEST, 
OR TEST) CONTAINING THE ERROW. 

lER INHIBIT ERROR REPOf*TING. 

IBE INHIBIT BASIC ERROR REPORTS. 

IXF INHI3IT -EXTENDED ERROrt REPORTS. 

PRI DIRECT ALL MESSAGES TO A Ll.^t PrtlNTtR. 

PNT PRINT ^U^«ER OF TEST BEING txrC'JTED, 

BOE BELL ON Ei'^ROR (NOT RELATED TO BELl PROMPTING), 

UAM PUN IN UN^TTENOFD MOOF , RiPA''.Sj.NG MANuAl 

INTERVENTION ( ILI I GAl » H'-f THIS OXAUNOSTXC ": , 

XbR XNMXeXI ^TtTX^TXCAL Rtt-ORT^, 



Jl. 
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IDU INHIBIT DROPPING Or UNITS By DIAGNOSTIC. 
(HAS NO EFFECT TN THIS DIAGNOSTIC.) 

LOT LOOP ON TFST. 
THE FLAGS NAMED GP EQUATED TO 1 ARE SET, THO^>E EQUATED \0 ARE 
CLEAHED. A FLAG NOV SPECIFIED IS CLEARED. IF THE FLAGS bWlTt.'! IS NOT 
GIVEN ALL FLAGS Arth CLEARED. SEE EXAMPLE AT END OF "EFFECT OF START 
COMMAND" SECTION. 

?.4.1.4 END OF PASS '.WITCH C /tCP : <INCR> ) - 

<INCR> IS A Df^CIMAL NUMBFR INOICATI.^ HOU OFTEN C IN TERMS OF 

PASSCS) IT IS DE5IR'£D THAT THE END OF PASS ME5SACE BE PRINTED. THE 

DEFAULT IS AT THE END OF EV^RY PASS. SEE EXAMPLE AT END UF "EFFECT OF 
START COMMAND" SECMON. 

2.4.1.5 EFFECT OF START COMMAND - 

THE EFFECT OF THE START COMMAND IS TO INITIATE MiC F'ARDWARE 
PARAMETER DIALOGUE. THE SOFTWARE PARAMETER DIALOGUE, THE 

INITIALIZATION QUESTIONS. AND THEN THE DIAGNOSriC C0W1ENCES TE?TIK,G. 

THE HARDWARE PARAMtTER DIALOGUE COMMENCES WITH THE QUCSM'' 4 "d 
UNT^S (D) ?'■ TO WHICH THE OPERATOR SHOULD REPLY WITH THE NUM( £F: OF 
UNITS TO BE TESTED. FOLLOWING THIS ARE THE QUtSTIONS WHEREBY THE 
P-TABLES THEMSELVES ARE BUILT. EACH P-TABLE IS A COUE -RESIDENT WBLE 
CONTAINING ALL THE HARDWAhL INFORMATION FOR ONE COMPLETE UNIT.f ACH 
QUESTION IS FOL'.OWED BY THE Rf:5P0NSE RADIX CD FOR DECIMAL. B FOR 
BINARY. FOR OCTAL. L FOR YES/NO) IN PARENTHESES AND THE DEF *Ul T 
VALUE AFTER THE PARENTHESES. FOR THE ACTUAL HARDWARE P- TABLE 
QUESTIONS SEE THE "HARDWARE PARAMETERS" SECTION. 

FOLLOWING THE HARDWARE QUESTIONS ARE THE jOFTWAME QUt^TIG^JS TO 
BUILD THE SOFTWARE TABLES. WHlC-t DEFINE OPERATING PARAMETERS 0^ TMf 
DIAGNOSTIC PROGRAM. THESE QUESTIONS ARE DESCRIBED IN THE "SOFTWARt 
PARAMETERS" SECTION. 

EX'\MPLF; 

STA/TESTS:l:3-4:/PA5S:3/FLAGS:IER:'IOE-l 

THIS COMMAND WILL CAUSE THREE PASSES TO BE MADE. WITH EACH PASS 
CONSISTING OF TESIS 1,5. AND 4. THERE IS NO DIMtRENCE BETWEEN SAVING 
<FLAG> AND SAYING «FLAG-1>. THE NOTATION 'UAG-0* IS MjANINGF^U ONI t 
ON A COMMAND OTHER THAN START TO CLEAR A H AC, THAT WAS PRfVIOUSl i SET, 
NOTE THAT ON ALL COMMANDS ONd THE FIRST THREE LETTERS ARE SCANNED* 
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2.4.? RESTART COMMAND - 

RtS(TART)/TtSTS:<TtS] -LIST > /PASS: <-PASS CNT > /^ LAGS : 

<rLAG-LIST>/UNITS:<LNIT-LIST> 



StQ 10 



^.4.2.1 TFSTS. PASS, AND FLAGS SWITCHES 

<TEST-LIST>. <PASS-CNT>, AND <FLAG-LIST> ARE AS IN 

COMMAND. 



THE START 



:.\4,2.? UNITS SWITCH (/UN':^S:<U^ T-LIST>) - <UNIT-LIST> IS A SEQUENCE 
OF DECIMAL NLIMBERS (O.l ETC.) OR RANGES OF DECIMAL NUMBERS (0-5. 8-10 
ETC.) THAT SPECIFY THE UNITS TO BE TESTED. THE NUMBERS ARE SEPARATED 
BY COLONS. T(*e NUMBERS MAY RANGE FROM THRU N-1 (N IS THE NUMBER OF 
UNITS SPECIFIED IN THE PREVIOUS S'iART COMMAND). THE NUMBER INDICATES 
THE POSITION OF THE P-VABLE AS THE DATA UAS ENTERED DURING THE 
HARDWARE DIAGLOGUE. THE UNITS UHICH ARE SELECTED MUST NOT HAVE BEEN 
DRCPPED BY T(€ DROP COMMAND. SEE THE DISCUSSION OF ADD AND DROP 
COMMANDS BELOW. DEFAULT IS TO TEST ALL UNITS WHICH HAVE NOT BEEN 
DROPPED BY A DROP COMMAND. 



2.4.2.3 EFFECT OF RESTART COMMAND - 

THE RESTART COMMAND DIFFERS FROM THE START COMMAND IN THAT THE 
P- TABLES FROM THE PREVIOUS START COMMAND (THERE MUST HAVE BEEN ONE) 
ARE USED, INSTEAD OF NEW ONES BEING BUILT. THE UNITS SWITCH SHOULD 



NOT BE USED WITH THIS 
BE RtEXECUTED (OPE'^ATOR 
COMMAND MODE HAS BEEN 
THE REQUESTED NUMBER OF 
ENCOUNTERED WITH THE 
ENTERED BY THE OPERATOR. 



PROGRAM. THE SOFTWARE DIALOGUE MAY OP". IONALLt 
WILL BE ASKED). THE COMMAND CAN BE USED AFTER 
REENTERED IN ANY OF THE THREE NORMAL WAlS: A) 
PASSES HAVE BEEN MADE . B ) AN ERROR WAS 
HALT ON ERROR FLAG SET. OR C) A CONTROL /C WAS 



2.4.3 CONTINUE COMMAND 
CON(TINUE)/PASS:<PASS-CNT/FLAGS:'FLAG LIST^ 



2.4.3.1 FLAG SWITCH ( /FLAGS : »Fl AG IISTO 

'FLAG LIST> IS SAME AS IN THE START COMMAND, BUT UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VAL'iE. 



LI. 
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2.4.3.2 FFFtCT OF CONTINUE COMMAND 

CONTINUE MOST FOLLOW A START OR RESTART, AND COMMAND MODE MU'^T 
HAVE BEEN ENTERED DUE TO A HALT ON ERROR OR A CONTROL/C. THE EFFECT 
OF THE CCMMAND IS TO GO TO THE BEGINNING OF THE TES THAT WAS BEING 
EXF.CUTED WHEN THE HALT OR CONTROL/C TOOK PLACE, SOFTWARE DIALOGUE MAY 
OPTIONALLY BE REEXECUTED. HARDWARE PARAMETERS MAY NOT BE CHANGED. 

?.4.4 PROCEED COMMAND 

PROCCEED) /FLAGS :<FLAG -LIST > 

?.4.4.1 F_AGS SWITCH ( /FLAGS : <FLAG-LISTO - 

<FLAG LIST> IS AS IN THE START COMMAND, BUT UNSPECIFIED FLAGS 
RETAIN THEIR CURRENT VALUE. 

.■.4.4.2 E TECT OF PROCEED COMMAND - 

PROCEED MUST FOLLUW A START. RESTART. OR CONTINUE. COMMAND MODE 
MUST HAVE BEEN ENTERED VIA A HALT ON ERROR. THE EFFECT OF THE COMMAND 
IS TO BtGZN EXECUTION AT THE LOCATION FOLLOWING THE ERROR CALL. 
NEITHER HARDWARE NOR SOFTWARE PARAMETERS MAY BE ALTERED. 



2,4,5 AIJD COMMAND 
ADD/LNXT5i:<UNIT-LIST> 

4 «*««*** i.4**««*«*************4t*i|i4*««4**«**4>«***4i******«*4>** 



2.4.6 tr FECI OF ADD COMMAND - 

THE UNITS SPECIFIED ARE ADDED TO THE TEST SEQUENCE'.. EACH 

UNIT MUST HAVE A P-TA9LE IN MEMORY DUE TO AN EARLIER 
HARDWARE DIALOGUE . THIS COMMAND r.JST BE FOLLOWED B> A 

RESTART OR CONTINUE. THE UNITS SWITCH MUST BE S^5^CIFlLD. 

THE ADD COMMAND IS MEANINGFUL ONLY FOR UNITS IHAT Wr.RE 
PREVIOUSLY L.'^OPPED, 



2.4.7 DROP COMMAND 

DRO(P)/UNITS;<UNIT LIST > 



Ml 
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^.4.8 f-.rFECT or DROP COMMAND - 

THE UNITS SPf^IFIED WILL BE DROPPED FROM TESTING. THt UNITS 
VIL'. BE RFSELECTEO ONLY BY THE EXECUTION OF AN ADD OR START 
COMMAND. THE UNITS SWITCH MUST BE ENTERED. ^hIS COMMAND 

must be followed by a restart or a continue command, 

.-^.4.9 print command - 

pricnt:) 

?.4.9.1 effect of print command - 

the total number of errors for each unit since the last 
start or restart command are printed, the isr (inhibit 
statistical reporting) flag is cleared 

2.4.10 display command - 

DISCPLAlf )/UNITS:<UN"T-LISi> 

2.4.10.1 EFFECT JF DISPLAY COMMAND 

THE HARDWARE P TABLE FO^ THE TEST STATION IS PRINTED IN THE 
FORMAT IN WHICH IT WAS ENTERED. 

2.4.11 FLAGS COMMAND - 
FLA(GS) 

2.4.11.1 EFFECT OF FLAGS COMMAND 

THE CURRENT SETTINGS OF ALL FLAGS ARE PRINTED. 



Nl. 
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P.-4.12 Z»-LAGS CdMAND 
ZFLCAGS) 

2.'. .13 ZFLAGS COMMAND 

ALL FLAGS ARE CLEARED. 

2.4.14 CONTRO- CHARACTERS - 

C A CONTr-,OL''C (C) ENTERED DURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES A RETURN TO COMMAND MODE. 



I A CONTROIVZ (Z) ENTERED DURING ONE ut- Tne TWO 
OPf RATOR DIALOGUES- HARDWARE P- TABLE DIALC'GLt. OR 
CO TUARE P- TABLE DIALOGUE CAUSt S THE DEFAULTS TO BE 
TAKEN FOR THE REMAINDER 0^ THAT DIALOGUE. 



A CONTROL/0 CO) ENTERED DURING i Ht EXf CuT ION OF m 
DIAGNOSTIC CAUSES ALL Tf LFTYPF. OUTPUT TO Bt 
SURPRES5ED FOR THE REMAINDER OF THt DIAGNOSTIC OR 
UNTII ANOTHER CONTP^'. /O IS TYPED. UMICH RESTORES 
NORMAL TELETTPb OUTPUT. 



. - ^ *r.-:. '- .7tp-.^jx, '-.-^ \i.-,^ 
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2,5 HARDWARE QUESTIONS 

WHEN A DIAGNOSTIC IS STARTED. THE RUNTIME SERVICES WILL PROMPT 
THE USER FOR HARDWARE INFORMATION BY TYPING "CHANGE HW (L) ?" 
YOU MUST ANSWER "Y" AFTER A START COMMAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN "PRELOADED" USING THE SETUP UTILITY (SEE 
CHAPTER 6 OF THE XXOP* USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A "Y", THE RUNTIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS (IN DECIMAL). YOU WILL THEN BE ASKED THE FOLLOWING 
QUESTIONS FOR EACH UNIT. 

1. CSR ADDRESS - THIS QUESTION REQUESTES THE CSR ADDRESS OF THE 
SPECIFIED DHU-11. THE DEFAULT ANSWER FOR THIS QUESTION IS 
ADDRESS 160460 (OCTAL). 

2. INTERRUPT VECTOR ADDRESS - THIS QUESTION REQUESTS THE INTERRUPT 
VECTOR ADDRESS OF ThtE SPECIFIED DHU-U. THE DEFAULT ANSWER 

IS 510 (OCTAL). 

5, ACTIVE LINES BIT MAP - THIS QUESTION REQUESTS AN OCTAL BIT 

MAP OF THE SERIAL COMMUNICATION LINES ON THE DHUll WHICH ARE 
BEING SELECTED FOR TESTING. IF THE BIT IN THE BIT MAP IS SET 
WHICH CORRESPONDS TO A PARTICULAR LINE (I.E. BIT 5 FOR LINE 
5 ) THAT LINE WILL BE TESTED BY THE FVT. 

4. TYPE OF LOOPBACK (1 -INTERNAL, 2-H3029 OR H3277) - THIS QUESTION 
REQUESTS THE TYPE OF LOOPBACK TO BE USED WHEN TESTING THE 
DHU-11. THE FOLLOWING TYPES ARE SUPPORTED: 

INTERNAL - ONLY INTERNAL UART LOOPBACK IS TO BE USED IN 
TESTING THE DHU-11. 

H302** OR H3277 - STAGGERED LOOPBACK CONNECTORS ARE PROVIDED 
ON THE DHUll DISTRIBUTION PANEL (H5029) IF THIS DISTRIBUTION 
PANEL IS NOT PRESENT THEN H5277 STAGGERED BERG CONNECTORtS> 
MUST BE INSTALLED ON THE BERG CONNECTOR SOCKETS OF iHt DHUU. 



H325 ■ SINGLE LINE, 25 PIN LOQPBACK CONNECTORS (TYPE H3e5) 
ARE INSTALLED ON THE LINES TO BE TESTED. 
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a»fe SOFTUARt QUESTIONS 

AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART 

OR CONTINUE COMMAND. THE RUNTIME SERVICES WILL ASK rOR SOFTWARE 

PARAMETERS. THESE PARAMETERS WILL GOVERN SOME DIAGNOSTIC SPECIFIC 

OPERATION MODES. YOU WILL BE PROMPTED BY "CHANGE SW CD ?" 

IF YOU WISH TO CHANGE ANY PARAMETERS, ANSWER BY TYPING 

"V. THE SOFTWARE QUESTIONS AND THE DEFAULT VALUES ARE DESCRIBED 

IN THE NEXT PARAGRAPH(S). 

1. REPORT UNIT ^WMBER AS EACH UNIT IS TESTED - THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD REPORT THE NUMBER OF THE UNIT WHICH 
IT IS TESTING AS IT BEGINS TO TEST THAT UNIT. 

2. EXTENDED ERROR REPORTING - THIS QUESUON ASKS WHETHER EXTENDED 
ERROR INFORMATION \S REQUIRED OTHER THAN THE "TEST FAILED" 
MESSAGE. ON EACH ERROR REPORTED. THE DEFAULT IS "NO" I.E. ONLY 
A MESSAGE REPORTING THE FACT THAT IHE TEST FAILED WILL BE 
PRINTED. 

3> !^WMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE - THIS 
QUESTION IS ASKED ONLY IF THE PREVIOUS QUESTION WAS ANSWERED 
"YES". THE QUESTION ASKS FOR THE NUMBER OF DATA ERRORS WHICH 
SHOctO BE REPORTED INDIVIDUALLY BY THIS PROGRAM FOR EACH LINE 
FOR tACH TRANSMISSION TEST. ERRORS WHICH ARE NOT REPORTED 
INDIVIDUALLY ARE REPORTED IN SUMMARY ERROR REPORTS. 



d;i 
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2,7 EXTtNDED P-TABLE DIALOGUE 

WHEN IfOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES 
IN A TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST 
WAY TO BUILD THIS TABLE IS TO ANSWER ALL QUESTIONS FOR EACH 
UNIT TO BE TESTED. IF YOU HAVE A MULTIPLEXED DEVICE SUCH AS 
A MASS STORAGE CONV'^OLLER WITH SEVERAL DRIVES OR A COMMUNICATION 
DEVICE WITH SEVERAL LINES. THIS BECOMES TEOrOUS SINCE MOST OF 
THE ANSWERS ARE REPETITIOUS, 

TO ILLUSTRATE A MORE EFFICIENT METHOD, SUPPOSE YOU ARE TESTING 
A FICTIONAL DEVICE, THE XYll. SUPPOSE THIS DEVICE CONSISTS OF 
A CONTROL MODULE WITH EIGHT UNITS (SUB-DEVICES) ATTACHED TO IT. 
THESE UNITS ARE DESCRIBED BY THE OCTAL NUMBERS THROUGH 7. THERE 
IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CALLED THE 
Q-FACTOR. THIS Q-FACTOR MAY BE OR I. BELOW IS A SIMPLE WAY 
TO BUILD A TABLE FOR ONE XYU WITH EIGHT UNITS. 

UNITS (D) ? 8<CR> 

UNIT 1 

CSR ADDRESS (0) ? i60000<CR> 
SUB-DEVICE 9 CO) ? 0<CR^ 
Q-FACTDR (0) ? l<CR-» 

UNIT 2 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE (0) ? 1<CR> 
Q-FACTOR (0) 1 ? 0<CR> 

UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE (0) ? 2<CR> 
Q-FACTOR CO) ? <CR> 

UNIT 4 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE d (0) ? 5<CR> 
Q-FACTOR CO) ? <CR^ 

"CSR ADDRESS CO) ? 160000<CR^ 
SUB-DEVICE CO) ? 4<CR> 
Q-FACTOR CO) ? <CR' 

\MIT 6 

CSR ADDRESS CO) ? 160000<CR^ 
SUB-DEVICE CO) ? 5<CR^ 
Q-FACTOR CO) ? <CR> 

UNIT 7 

CSR ADDRESS (0) ? 160000<QR> 

_ SUB DEVICE it (d) I 6*Cftl 

Q-FACTQR CQJ ? 1<QB> 



^c'. 
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UNIT 8 

CSR ADDRESS (0) 160000<CR> 

SUB-DEVICE i> CO) ? 7<CR> 

U-FACTOR (0) 1 ? <CR^ 

NOTICE THAT THE DEFAULT VALUE FOR THE Q -FACTOR CHANGES WHEN A 
NON-DEFAULT RESPONSE IS GIVEN. BE CAREFUL WHEN SPECIFYING 
MULTIPLE UNITS! 

AS 'fOU CAN SEE FROM THE ABOVE EXAMPLE. THE HARDWARE PARAMETERS 

DO NOf VARY SIGNIFICANTLY FROM UNIT TO UNIT. THE PROCEDURE SHOWN IS 

NOT VERY EFFICIENT. 

THE RUNTIME SERVICES CAN TAKE MULTIPLE LNIT SPECIFICATIONS HOWEVER. 
LET'S BUILD THE SAME TABLE USING THE MULTIPLE SPECIFICATION 
FEATURE. 

d UNITS (D) ? 6<CR> 

UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE (0) ? 0.1^CR> 
Q-FACTOR CO) ? 1.0<CR> 

UNIT 5 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE CO) ? i?-5<CR> 
Q-FACTOR CO) ? 0<CR^ 

UNIT 7 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE CO) ? 6.7<CR> 
Q-FACTOR CO) ? 1<CH> 

AS YOU CAN SEE IN Tit ABOVE DIALOGUE. THE RUNTIME SERVICES WILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN AN> 
ONE PASS THROUGH THE QUESTIONS. IN THE FIRST PASS. TWO ENTRIES 
ARE BUILT sin:". TWO SUB-DEVICES AND Q-FACTORS WERE SPECIFIED. THE 
SERVICES ASSUME THAT THE CSR ADDRESS IS 160000 FOR BOTH SINCE IT 
WAS SPECIFIED ONLY ONCE. IN THE SECOND PASS. FOUR ENTRIES WERE 
BUILT. THIS IS BECAUSE FOUR SUB-DEVICES WERE SPECIFIED. THE 
"■" CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA 
FROM THE FIRST NUMBEf^ TO .HE SECOND. IN THIS CASE. SUB-DEVICES 
2. 5. 4 AND 5 WERE SP'^CIFIEO, C IF THE SUB-DEVICE WERE SPECIFIED 
BY ADDRESSES. THE INCREMENT '.'OULD BE Br 2 SINCE ADDRESSES MUST 
BE ON AN EVEN BOUNOARY . ) THE CSR ADDRESSES AND Q-FACTORS FOR 
THE FOUR ENTRIES ARE ASSUMED TO BE 160000 AND RESPECTlVELi 
SINCE THEY WERE Oi^l SPECIFIfO ONCE. THE LAST TWO L^TiITS ARE 
SPECIFIED IN THE THIRD PASS. 

THE WHOLE PROCESS COULD HAVE BEEN ACCQMPLXSHtU IN ONE PASS AS 
SMQHN BELOW. 

iJNITS CD) ? a<CR^ 



Xm BBb'u^^N'T^'^^ ''' '"''' 
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CSR A\ODRESS (0) ? 1600OO*CR> 
SUB-DEVICE (0) ? 0-7<CR> 
Q-FACTOR (0) ? 0. 1 .0. . . . 1 , 1<CR> 

AS YOU CAN SEE FROM THI^ EXAMPLE. NULL REPLIES (COMMAS ENCLOSING 
A NULL FIELD) TELL THF RUNTIME SERVICES TO REPEAT THE LAST REPLY, 



2.Q QUICK START-UP PROCEDURE CXXDPO 
TO START UP THIS PROGRAM: 

1. BOOT XXOP* 

2. GIVE THE DATE AND ANSWER THE LSI/UNIBUS AND 50HZ (IF THERE 
IS A CLOCK) QUESTIONS. NOTE. NOT ALL VF^SIONS OF XXDP» ASK 
FOR THE CLOCK FREQUENCY 

5, TYPE "R NAME", WHERE NAME IS THE NAME OF THE BIN OR 
BIC FILE FOR THIS PROGRAM 

4. TYPE "START" 

r.. ANSWER THE "CHANGE HW" QUESTIU. ..TIH "Y" 

6, ANSWER ALL THE HARDWARE QUESTIONS 

7, ANSWER THE "CHANGE SW" QUESTION WITH "N" 

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USIN^. ONL ^ THE 

DEFAULTS FOR FLAGS AND SOFTWARE PARAMETERS. FOR 3EFALA T INfURHATION 

S£E THE SECTIONS WITHIN THIS DOCUMENT ON FLAGii.AND HARDWARE QUESTIONS. 



mm^ BSbuA^N^T^'^'^ 
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SEQ 19 



3.0 ERROR INFORMATION 

3.1 TYPES or ERROR MESSAGES 

T^CPE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY 

k DIAGNOSTIC: GENERAL. BASIC AND EXTENDED. GENERAL ERROR MESSAGES 

A^u ALUV^YS PRINTED UNLESS THE "lER" FLAG IS SET (SEE THE FLAGS SECTION 



OF 



UOCUMFNT). 



THE GENERAL E^^ROR MESSAGE IS OF THE FORMr 

NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PCjXXXXXX 
ERROR MESSAGE 



HARD OR SOFT) 



.WHERE; NAME • DIAGNOSTIC NAME 

TYPE • ERROR TYPE CSYS FATAL. DEV FATAL 

NUMBER - ERROR NUMBER 

UNIT NUMBER - - N (N IS LAST UNIT IN PTABLE) 

TST NHJM6ER - TEST AND SUBTEST WHERE ERROR OCCURRED 

PC:XXXXXX • ADDRESS OF ERROR MESSAGE CALL 

BmSIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SaiE ADDITIONAL 

INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 

THE "lER" OR "IBR" FLAGS ARE SET (SEE THE FLAGS SECTION OF THIS 

DOCUMENT). 

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED Fci^RAL MESSAGE 

EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAtS 
PRINTED Ufr4LESS THE "lER". "IBR" OR "IXR" FLAGS ARE SET (SFF THE 
FLAGS SECTION OF THIS DOCUMENT). 

THESE MESSAGES A.~;E PRINTED AFTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 
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SEQ 20 



.^.2 SPECIFIC ERROR MESSAGES 



THIS PROGRAM IS INTENDED TO PROVIDE A GO/NOGO INDICATION 
OF THE FUNCTIONALITY OF THE DHU-ll BOARDS. TO EXECUTE THE 
PROGRAM IN THIS MODE THE OPERATOR NEED ONLY ANSWER THE 
"EXTENDED ERROR REPORTING" SOFTWARE QUESTION WITH "NO", THE 
PROGRAM WILL THEN ONLY PRINT THE NAME OF THE FAILING TEST 
THE TEST ANO ERROR NUMBERS. FOR A LIST Or THE TEST NAMES 
IN THIS PROGRAM SEE THE TEST SUMMARIES SECTION OF THIS 
DOCUMENT. AN EXAMPLE OF SUCH A AN ERROR MESSAGE IS THE 
FOLLOWING: 

CZDHV DVC FTL ERR 04106 ON UNIT 00 TST 003 SUB 000 PC: XXXXXX 
DMA.ABORT BIT TEST FAILED 

THIS ERROR INDICATES THAT A FATAL ERROR WAS ENCOUNTERED 
DURING THE TEST WHICH TESTS THE DMA.ABORT BIT. 

IF THE OPERATOR HAD REQUESTED EXTENDED ERROR REPORTING THE 
SAME ERROR WOULD BE REPORTED AS FOLLOWS: 

CZDHV DVC FTL ERR 04106 ON UNIT 00 TST 003 SUB COO PC: XXXXXX 
DMA ABORT BIT TEST FAILED 

DMA. START BIT FOUND SET AFTER DMA ABORTED ON LINEi 8 



4.0 PtRFORMANCE AND PROGRESS REPORTS 

AT THE. END OF EACH PASS, THE PASS COUNT 15 GIVEN ALONG WITH THE 
TOTAL NUMBER OF ERRORS REPORTED SINCE THE DIAGNOSTIC WAS STARTED. 
THE "EOP" SWITCH CAN BE USED TO CONTROL HOW OFTEN THE END 
OF PASS MESSAGE IS PRINTED. FOR FUTHER INFORMATION SEE THE 
SWITCHES SECTION OF THIS DOCUMENT, 



1 



?. 
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b.O TEST SUMMARIES 

THE FOLLOiJlNG ARE INCLJOED WITHIN CZDHVB; 

1. DEVICE r.EGISTER ACCESS TEST - VERIFIES THAT THE UUT REGISTERS 
WILL RESPOND WITH THE CORRECT UNIBUS HANDSHAKING SIGNALS. 
VERIFIES THAT THE tVT IS AT THE CORRECT ADDRESS. 

2. DMA. START TEST - VERIFIES THAT EACH DMA START BIT WILL 
INITIATE A DMA TRANSMISSION ON A LINE 

3. DMA. ABORT TEST - VERIFIES THAT EACH DMA ABORT BIT WILL 
STOP A DMA TRANSMISSION. RETURN A TX, ACTION AND SUCCESFULY 
RESTART THE DMA. 

4. DMA. ERROR TEST - VERIFIES T;iAT THE DMA ERROR BIT IN THE CSR 
REPORTS DMA ERRORS CORRECTLY WHEN THE^' OCCUR. 

5. O.AUTO INACTIVE TEST - VERIFIES THAT THE DUT WILL NOT RESPOND 
TO INCOMING XON AND XOFF CHARACTERS WHEN O.AUTO IS CLEAR. 

6. O.AUTO ACTIVE TEST - VERIFIES THAT THE DUT RESPONDS CORRECTLY 
TO INCOMING FLOW CONTROL CHARACTERS WHEN ACTIVE 

7. I. AUTO INACTIVE TEST - VERIFIES THAT THE DUT WILL NOT GENERATE 
XON AND XOFF CHARACTERS IN RESPONSE TO THE APPROPRIATE FIFO 
CONDITIONS WHEN I . AUTO IS INACTIVE. 

8. I.AUIO ACTIVE TEST - VERIFIES THAT THE DUT WILL GENERATE 
XON AND XOFF CHARACTERS IN RESPONSE TO THE APPROPRIATE FIFO 
rONOITIONS WHEN I . AUTO IS ACTIVE. 

9. FIFO DATA TEST - VERIFIES THAT THE FIFO WILL HOLD 2S6 
CHARACTERS WITHOUT CORRUPTING DATA. 

10. FIFO 3/4 LEVEL INACTIVE TEST - VERIFIES THAT THE 3/4 L';: 
ALARM DOES NOT BECOME ACTIVE BELOW THE 3/4 LEVEL., 

11. FIFO 3/4 LEVEL ACTIVE TEST - VERIFIES THAT THE 3/4 LEVEL 
ALAf?M BECOMES ACTIVE WHEN THE FIFO IS 3/4 FULL. 

12. FIFO 3/4 LEVEL ACTIVE/INACTIVE TEST - VERIFIES THAT THE 3/4 
LEVEL ALARM. ONCE ACTIVATED, REMAINS ACTIVE UNTIL THE FIFO 
IS REDUCED BELOW THE 1/2 LEVEL. 

13. F. 1/2 L"_VEL TEbT ■ VERlFIt: THAT THE FIFQ 1/2 LEVEL 
AL "^M SYSTEM BECOMES ACTIVE AND tnACTIVE AT THE CORRECT 

LEVELS. 

i4, RXTIMER TEST - VERI«^IES THAT THE HCL D OFF TIMER f OR 

HX INTERRUPTS ;s OPt^^ATINQ CQRRECTl.Y, AND THAT THE 3/4 FULL 
LEVeL OVERIDES THE Tlit=R. 



Scl 
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15. TX-rtCTION FIFO TEST - VERIFIES THAT THE TX-ACTION FIFO 

CAN HOLD 16 UNIQUE TX-ACTIONS, AND THAT ONLY ONE TX INTERRUPT 
OCCURS FOR ALL 16 TX-ACTIONS. 

16. TX FIFO TEST - VERIFIES THAT THE FIFO WILL 64 UNIQUE CHARACTERS 
AND ALSO THAT ONLY ONE INTERRUPT OCCURS FOR ALL 64 CHARACTERS. 

17. BREAK GENERATION TEST - VERIFIES THAT ALL SERIAL TRANSMIT LINES 
CAN GENERATE A BREAK BY SETTING THE BRK BIT IN THE ASSOCIATED 
LNCTRL REGISTER. 

18. NO OVERRUN ERROR TEST - VERIFIES THAT THE OUT WILL NOT REPORT 
DATA OVERRUN ERRORS WHEN THEY 00 NOT OCCUR. 

19. OVERRUN ERROR TEST - VERIFIES THAT THE OUT WILL REPORT DATA 
OVERRUN ERRORS WHEN THEY OCCUR. 

20. REPORT BMP CODES TEbT - THIS PSEUDO TEST REPORTS THE FIRST 32 
CHARACTERS WHICH WERE DISCOVERED IN THE FIFO DURING THE 
EXECUTION OF THE OTHER TESTS. THIS AVOIDS INTERRUPTION OF THE 
OTHER TESTS BY THESE CODES IF THEY AR£ NOT CRITICAL TO THE 
PERFORMANCE OF THE TESTS. 



\<?. 
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6.0 EXAMPLE ERROR KREt PASS 

THE FOLLOWING IS AN EXAMPLE OF AN ERROR FREE PASS DIALOGUE: 

.R C^DHVBO 

CZDHVBO.BIN 

DR5 

CZDHV-B-0 

DHU-11 FUNC TST PART? 

UNIT IS DHU- 11 

RESTRT ADDP: 147670 

DR>STA/PAS:1 

CHANGE HU (Lj ? Y 

■0 UNITS (D) ? 2 

UNIT 

CSR ADDRESS: (0) 160460 ? t/ 

UNIT 1 

CSR ADDRESS: CO) 160460 ? 160500 

INTERRUPT VECTOR ADDRESS: (0) 310 ? 320 

ACTIVE LINE BIT MAP: (0) 177777 ? <CR> 

TYPE OF LOOPBACK (1-INTERNAL, 2-H3029 OR H3277): (0) 2 ? 1 

CHANGE SU CD ? Y 

REPORT UNIT NUMBER AS EACH UNIT IS TESTED: (L) Y ? <CR^ 
EXTENDED ERROR REPORTING: (L) N ? <CR> 

TESTING UNIT ; 

TESTING UNIT : 1 

C/DHV EOP 1 
TOTAL ERRS 

DR> 



l;:^ 
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SEQ 24 



1050 

lOSl 

1050 

1060 

1061 

1062 

1063 

1064 

1065 

1066 

1067 

1068 

106^ 

1070 

1071 

1072 

107? 

1074 

1075 

1076 

107 7 

1078 

1079 

1060 

1081 

1082 

1083 

1084 

1085 

1086 

1087 

1088 

1089 

1090 

1091 

1092 

1093 

1094 

1095 

1112 

XX13 



000000 



000000 



002000 



002000 



002000 
002000 
002000 
002001 
002002 
002003 
002004 
002005 
002006 
002007 
002010 
002010 
002011 
002011 
002012 
00201 '-^ 
002014 



.LIST SEQ.LOCBIN.MEB 
.NLI3T CND 



.SBTTL PROGRAM HEADER 



.MCALL SVC 
SVC 



I INITIALIZE SUPERVISOR MACROS 



i IF STRUCTL«ED MACROS ARE TO BE USEO. ADD ".MCALL STRUCT" AND "STRUCT" 

: TO INITIALIZE THE STRUCTURED MACROS. 



000001 
000001 
000001 
000001 
000001 



SVCINS- 1 

SVCTST- 1 

svcsue- 1 

SVCGBL- 1 

SVCTAG- 1 



I LIST INSTRUCTIONS. SHIFTED RIGHT 
» LIST TEST TAGS. SHIFTED RIGHT 
I LIST SUBTEST TAGS, SHIFTED RIGHT 
I LIST GLOBAL TAGS» SHIFTED RIGHT 
; LIST OTHER TAGS. SHIFTED RIGHT 



: CHANGE THE VALUES OF THE SVC,.. SYMBOLS TO BE ZERO IF YOU WISH 

I TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS, CHANGE THE 

; SYMBOLS TO BE MINUS -ONE TO NOT LIST THE EXPANSIONS. YOU MAY 

i CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 



002000 



.ENABL ABS 
i.ENABL AMA 



2000 



BGNMOD 



i *» 



THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 



POINTER BGNRPT . BGNSW , BGNSF T , BGNDU , ERRTBU 



HEADER CZ0HV,B,0,22»0,PRX0? 



LJNAME 



103 
132 

104 
110 
126 
000 
000 
000 

i02 

060 

000000 



.ASCII 


/c/ 


.ASCII 


/z/ 


.ASCII 


/D/ 


.ASCi: 


/H/ 


.ASCII 


/v/ 


.BYTE 





.BYlE 





.BYTE 






L$REV: 
L$DEP0 
L$UNIT 
LITIML 



.ASCII /B 



.ASCII 
.WORD 







HVBO DHU-11 FUNC TST PART2 



GRAM HF.ADER 




002014 


000022 


002016 




002016 


035156 


002020 




002020 


035404 


002022 




002022 


002176 


002024 




002024 


002210 


002026 




002026 


055706 


002050 




002050 


000000 


002052 




002052 


000000 


002054 




O0205< 


000000 


002036 




002036 


000000 


0020^ 




0020^ 


002124 


OC^O' ? 




' »0..'0^ ?. 


000340 


C02044 




00204" 


000000 


002046 




002046 


000000 


002050 




002050 


003 


002051 


003 


002052 




002052 


OOOOOO 


002054 


000000 


002056 




002056 


OOOOOO 


002060 




002060 


004120 


002062 




002062 


020030 


0020b4 




002064 


OOOOOO 


00cf066 




002066 


OOOOOO 


002070 




002070 


OOOOOO 


002072 




OO2072 


020704 


002074 




002074 


OOOOOO 


002076 




002076 


004130 


002100 




002100 


104035 


002102 




002102 


004050 


002104 




Q021Q4 


020044 
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SEQ 25 





.WORD 


22 


L$HPCP: 








* .WORD 


L$HARD 


L.JSPCP: 








' .WORD 


L$sorT 


LiHPTP: 








* .WORD 


LJHW 


L$SPTP: 








* . WORD 


L$SW 


L$LADP: 








'.WORD 


L$LAST 


L$STA: : 








.WORD 





L5C0: : 








.WORD 





LJDTYP- 


• 






.WORD 





L$APT: 








.WORD 





L$OTPi 








.WORD 


L$0I5PATCH 


L$PRI0 








' . WORD 


PRI07 


LJENVI 








' .WORD 





L4EXP1 








' . WORD 





L$MREV 








' .BYTE 


CJREVISION 




.BYTK 


CJEDIT 


LJEF: : 








.WORD 







.WORD 





L$SPC: 








.WORD 





L$DEVP 








' .WORD 


LJDVTYP 


LJREPP 








' . WORD 


LJRPT 


L$EXP4 








' .WORD 





LJEXP5 








" . WORD 





LJAUT: 








.WORD 





l-$DUT: 








.WORD 


I $DU 


L$LUN: 








.WORD 





LiDESP 


; ; 






.WORD 


l.SOFSC 


LSLOAD 


J 






EMT 


E$l OAD 


L$ETP: 








.WORD 


L$tRRTBL 


UUCP; 








.WORD 


LUKIT 
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1114 



0C?106 
002106 

oo?no 

002110 
00211^: 

0211;? 

^0^114 
00^114 

ViOc'll*. 

C0211b 
OOtU^O 
002120 



020666 

020664 
020036 
000000 
000000 
000000 



L$CCP: 








.WORD 


L$CLEAN 


L$ACP: 








.WORD 


LJAUTO 


LJPRT: 








.WORD 


LJPROT 


LiTEST 


* 






. WORD 





L$DLY: 








.WORD 





L$HIMe 


■ 






.WORD 






SEQ 26 



CZDHVBO DH\.t 11 FUMC TST PART^ 
DISPATCH TABLE 



11^7 
11^9 

1150 
1151 
115J 
1133 
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E35 

PAGE 34 



1134 



002122 
002122 
002124 
002124 
002126 
002130 
002132 
002134 
002136 
002140 
002142 
002144 
002146 
002150 
002152 
002154 
002156 
002160 
002162 
002164 
002166 
002170 
002172 



000024 

021022 
021304 
021710 
022546 
022674 
025474 
024274 
024716 
025410 
025716 
026226 
026726 
027424 
030102 
031152 
051740 
032766 
033412 
054150 
055074 



.SBTTL DISPATCH TABLE 



» ♦ • 

t 



THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF FACH TEST, 
IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 



DISPATCH 20 



.WORD 


20 


LJDISPATCH:: 




.WORD 


Tl 


,g0RD 


T2 


.WORD 


T3 


.WORD 


T4 


.UORO 


T5 


.UORD 


T6 


.UORD 


T7 


.WORD 


T8 


.WORD 


T9 


.WORD 


TIO 


.WORD 


Til 


.UORO 


T12 


.WORD 


T15 


.WORD 


T14 


.WORD 


T15 


.WORD 


T16 


.WORD 


T17 


.WORD 


T18 


.WORD 


T19 


.WQRQ 


T20 



SEU 27 






6fep)('?eH^'i'hw^ 
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PAGE ^5 



SEQ 28 



114^ 
USO 

USl 

n^o 

1155 
1154 

nss 

115^ 

us: 

1158 
115^ 
1160 



Ufcl 
1162 
1165 
1164 
1165 
1166 
1167 



002174 
002174 
002176 
002176 



SBTTL OEFAULT HARDWARE P-TABLE 



THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF 
THE TEST DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES. 
AND IS USED AS A "TEMPLATE" FOR BUILDING THE P- TABLES. 



BGNHW OFPTBL 



000004 



LiHW: : 
DFPTBL! 



WORD L 10000 -L$HW/2 



002176 160460 

002200 000510 

002202 l????-* 

002204 002 

002206 
002206 



.WORD 


160460 


.WORD 


510 


.WORD 


177777 


.BYTE 


2 


.EVEN 




ENOHW 





(DEFAULT CSR ADDRESS 
lOEFAiJLT VECTOR ADDRESS 
lD»=-FAULT ACTIVE LINES BIT 
J DEFAULT LOOPS ACK MODE 



MAP 



LlOOOOi 



smm R^D^iAR^^'FriiJ 
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SF.Q 29 



1176 

1K7 
1178 
1179 

1100 
1181 
118J 
1185 
1184 
1185 
U86 
1187 



1188 
1189 
1190 
1191 
1192 



00220t) 
002206 
002210 



002210 
002212 

002214 
0032 X A 



.SBTTL SOFTUARE P-TABLE 



THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BT THE 
PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARC 
SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR 
AT RUN TIME. 



00000. 



000020 
000000 



BGNSW SFPTBL 



OPTION:; 
NOERPT;; 

ENDSW 



LiSW: : 
SFPTBL 



.WORD L10001-L$SW/2 



.WORD 
.WORD 



20 




J BIT MAP OF PROGRAM CONTROL F^AGS 

iD&FAULT NUMStR OF INDIVIDUAL DATA ERRORS TQ RPT 



LlOOOl; 



e:^ 



gPV^F 


OHU^U KUNC TSl 


i;:oi 




i^OJ 




l^OS 




1^15 




1214 




121^^ 




1216 




121 : 




1218 




1219 




1220 




1221 


000020 


1222 


177777 


1225 




1224 




122S 


000000 


1226 


000002 


1227 


000002 


1228 


000004 


1229 


000006 


1230 


000006 


1251 


0000 10 


1252 


000012 


1255 


000014 


1254 


000016 


1255 




1256 




125/ 


000020 


1258 


000050 


1259 


000100 


1240 




1241 




1256 


0022X4 




I 00000 




040000 




020000 




01 0000 




004000 




002000 




001000 




000400 




000200 




OOOIOO 




000040 




000020 




000010 




000004 




000002 




000001 




001000 




000400 




000200 




OOOIOO 
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.SBTTL GLOBAL EQUATES SECTION 



I ♦ » 



SEQ 30 



I THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
( ARE USED IN MORE THAN ONE TEST. 



NUMLNS--20 
MAPLNS«-177777 

,*♦♦*♦♦ DEVICE REGISTER 
CSRO-"0 
ReUF0--2 
RXTIM0--2 
LPR0--4 
FSLS0--6 
F0ATO--6 
LNCTR0--X0 
TXAD10--12 
TXAD2a--14 
TXBF-C0--16 



(NUMBER OF LINES ON DHUll IS 8. 
iBIT MAP OF LINEG ON DHUll. 

OFFSETS FROM THE CSR* S ADDRESS *♦*♦♦♦ 
iCSR REGISTER OFFSET FROM THE CSR ADDRESS 
iRECEIVE REGISTER OFFSET FROM THt CSR ADDRESS 
iRECIEVE TIMER REGISTER OFFSET FROM THE CSR ADDRESS 
iLlNE PARAMtTER REGISTER OFFSFT FROM THE CSR ADDRESS 
|FIFO:>IZE/STATUS REGISTER OFFSET FROM THE CSR ADDRESS 
jFIFOOATA REGISTER OFFSET FROM THE CSR ADDRESS 
iLINE CONTROL REGISTER OFFSET FROM THE CSR ADDRESS 
(TRANSMIT ADDRESS I REGISTER OFFSET FROM THt CSR ADDRESS 

CSR ADDRESS 
ADDRESS 



(TRANSMIT ADDRESS 2 REGISTER OFFSET FROM THE 
(TRANSMIT COUNT REGISTER OFFSET FROM THE CSR 



t«4*4i4>4i 



EQUATES USED 
RXBETX--16. 
RXBDTX--24. 
RXBFUL"-64. 



EQUALS 



WITH RESPECT TO THE. RX BUFFER •»♦••* 

(LEVEL OF RX BUFFER AT WHICH TO RE ENABLE TRANSMISSION, 
(LEVEL OF RX B<JFFER AT WVUCH TO DISABLE TRANSMISSION. 
(TOTAL CHARACTER CAPACITY OF THt RX BUFFER, 



( BIT DIFINITIONS 



BIT15 
BIT14 
BIT13 
BIT12 
BITll 
BITIO 
BIT09 
BIT08 
DIT07 
BITOfe 
BIT05 
BIT04 
BIT05 
BIT02 
BITOl 
BITOO 

BIT9- 
BITS- 
BIT?. 

eiT6** 



100000 

40000 

20000 

10000 

4000 

2000 

1000 

400 

200 

100 

40 

20 

10 

4 

2 

I 

BIT09 
BIT08 
BIT07 

BITO^ 



8t8^Xrf8tll^T^i W^'r.h^' 



000040 
000020 
000010 
000004 
00000? 
000001 



000040 
000037 
000036 
000035 
000034 
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Sr.Q 31 



BITS-- BIT05 

Bir4-- BIT04 

BIT3-- BIT03 

BIT2-- B1T02 

Bill-- BITOl 

BITO-- BITOO 

t EVENT FLAG DEFINITIONS 

! EFS'diEFl? RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 



EF. START-- 


32 


EF. RESTART-- 


31 


EF.CONTINUE-- 


30 


EF.NEW-- 


29 


EF.PWR-- 


2B 



; START COMMAND WAS ISSUED 

, RESTAfiT COMMAND WAS ISSUED 

t CONTIigUE COMMAND UAS ISSUED 

; A NEW PASS HAS BEEN STARTED 

i A POWf.R -FAIL/POWER -UP OCCURRED 



PRIORITY LEVEL DEFINITIONS 



Vdb7 



000340 
000300 
000240 
000200 
000140 
000100 
000040 
000000 



000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
002000 
004000 
OlOOOO 
020000 
040000 
100000 



PRIO^ 


'-- 340 


PRIO^ 


)■- 300 


PRIO:>-- 240 


PRIW 


■- 200 


PRI05-- 140 


PRI02-- 100 


PRIOl 


.-• 40 


PRI00-- 


1 OPERATOR FLAG 


EVL-' 


4 


LOT-' 


10 


ADR" 


2C 


IDU-' 


40 


ISR-' 


100 


UAM- 


200 


BOE" 


400 


PNT-< 


1000 


PRI- 


2000 


IXE- 


4000 


IBE- 


10000 


lER- 


20000 


L OE- 


40000 


MOE*^ 


100000 



CZDHVHO DHU 11 fUNC TbT PAPT2 
GLOBAL EQUATES SECTION 
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SEQ 32 



K^66 






1^67 






l^^bP 






1^6^ 






lJ/0 






1^71 






\^:c 










1J75 






lc'^74 






1J75 






1^76 






1.^7 7 






1278 






1279 


002214 


000200 


1280 


002216 


000204 


1281 


002220 


177777 


1282 


002222 


000 


1285 


002223 


004 


1284 


002224 


000000 


126S 






12tt6 






1287 






1288 






1289 


002226 




1290 


002226 


160020 


1291 


002250 


160022 


12^2 


002232 


160024 


1293 


002254 


160026 


1294 






1295 


002236 


160030 


1296 


002240 


160052 


1297 


002242 


160054 


1298 


002244 


160036 


1299 






1500 






1501 






1302 






1305 


002246 


000000 


1304 


002250 


000000 


1505 


002252 


000000 


1506 


0022S4 


000001 


1507 


002256 


000000 


1508 


002260 


051465 


1509 


002262 


146514 


1310 


002264 


000000 


1511 


002266 


000000 


1512 


0022 70 


000000 


1515 


002272 


000000 


1514 


0022 74 


000000 


1515 


002276 


000000 


1516 


002500 


000000 


1517 


002302 


000000 


151H 






1514 






1520 






15^1 


002304 


177546 


I'i'd^ 


0Q23Q6 


000300 



.SBTTL GLOBAL DATA SECTION 

I THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
I IN MORE THAN ONE TEST. 
I - - 

i UNIT VARIBLE AREA 

tRX VECTOR ADDRESS. 

iTX VECTOR ADDRESS. 

jACTIVE LINE BIT MAP. 

iLOOPBACK MODE 

I INTERRUPT BUS REQUEST LEVEL 

lUNIT NUMBER. 

I DEVICE REGISTER ADDRESS TABLE 

DRADRT 

lOHU-U CSR ADDRESS. 

iDHU-ll RECIEVE BUFFER/TIMER ADDRESS. 
»DHU-U LINE PARAMETER REGISTER ADDRESS. 
iDHU-U FIFO SIZE/LINE STATUS REGISTER ADDRESS, 
I AND FIFO DATA REGISTER ADDRESS. 
iDHO-U LINE CONTROL REGISTER ADDRESS. 
iDHU-U TRANSMIT BUFFER 1 REGISTER ADDRESS 
jDHU-U TRANSMIT BUFFER 2 REGISTER ADDRESS 
iDHU-ll TRANSMIT BUFFER COUNT REGISTER ADDRESS 



RXVECA: 


.WORD 


200 


TXVECA: 


.WORD 


204 


ACTLNS: 


: .UORD 


177777 


LOPOCK: 


: .BYTE 





BRLEVL: 


: .BYTE 


4 


UNITN:: 


.WORD 






RXTMA: 
FDATA: 



CSRA: 
RBUFA 
LPRA: 
FSLSA 

LNCTRA 
TXADIA 
TXA02A 
TXBFCA 



.WORD 
.WORD 
.UORD 
.WORD 

.WORD 
.WORD 
.WORD 
.WORD 



160020 
X 60022 
160024 
160026 

160030 
160032 
160034 
160036 



ASSORTED GLOBAL VARIABLES: 



BUFPTR:: .WORD 

CTRLCF: : .WORD 

EXOERR:: .WORD 

TSTNUM: j .WORD I 

lESTAT: : .WORD 

LGRPIM: : .WORD 31463 

LGRP2M! : .WORD 146314 

PASCNT:: .WORD 

RXINTC:: .WORD 

RXINTF : ; .WORD 

TXINTC:: .WORD 

TXINTF; ; .WORD 

TP4VEC: : .WORD 

TP4FLG: : .WORD 

WORDl: : .WORD 

1 LINE TIME CLOCK VARIABL 

(**44l**** •**«*** 4 ************** 

CLKCSR: : .WORD \ 7 7546 

CLKBRL: : .V^IORO PRI06 



iSTORAGE FOR RECEIVE CHARACTER BUFFER POINTER, 

i STORAGE FOR THE CONTROL -C FLAG. 

I "EXIT CM ERROR" FLAG. 

I STORAGE FOR THE TEST NUHBER. 

iSTORAGE FOR STATES OF THE OUT INT ENABLE BITS. 

(BIT MAP OF LINES IN LINE GROUP I. 

iBIT MAP OF LINES IN LINE GROUP II. 

iSTO'G FOR PASS COLWT USED IN ROM VERSION* TST. 

iSTORAGE F0« RECEIVER INTERRUPT FLAGS. 

;STOflAGE FOR RECEIVER INTERRUPT FLAGS. 

, STORAGE FOR TRANSMIT INTERRUPT COUNT. 

tSTORAGE FOR TRANSMIT INTERRUPT FLAGS. 

iSTORAGE FOR THE NORMAL 0O4 TRAP VECTOR. 

iFLAGS SET WHEN AN EXPECTED 004 TRAP OCCL^S . 

(LOCATION FOR PASSING INDIRECT PARAMETERS. 

fS AND STORAGE. 

(CSR ADDRESS OF THE L TC. 

lINTtRRUPT PRIORITY LLVEL OF THh LTC. 



C/DHVHO DHU-11 F UNC 
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SEQ 33 



1323 

1324 

1325 

1326 

1327 

1326 

1329 

1330 

1331 

1332 

1335 

1334 

1335 

1336 

1337 

1338 

1339 

1340 

1341 

1342 

1343 

1344 

1345 

1346 

1347 

1348 

1349 

1350 

1351 

1352 

1353 

1354 

1355 

13?6 

13'J/ 

1 '.58 

1359 

1360 

1361 

1362 

1363 

1364 

1365 

1366 

1367 

1368 

136^ 

1370 

1371 

137? 

1373 

13 74 

13/5 

13/6 

15// 

1-^/8 

1379 



002310 
002312 
002314 
002316 
002320 
002322 
002324 
002326 



002330 
00-^332 
002334 



002336 
002340 
002342 
002344 
002346 
002350 
002352 
002354 
002 556 
002360 
002362 
0O2364 
00236O 
002370 
002572 
002374 



002376 
002376 
002400 
002402 
002404 
002406 



000100 
000074 
000000 
000000 
000170 
000170 
000021 
000062 



177572 
000000 
000000 



00000 I 
000002 
000004 
000010 
000020 
000040 
000 100 
000200 
000400 
001000 
00?000 
004000 
010000 
020000 
040000 
100000 



000000 
000000 
000000 
000000 
000000 



002410 000000 

002412 

002612 



CLKVtC 
CLKHRZ 
TIMER 1 
TIMER2 
TIMER5 
B COUNT 
MSTICK 
MSLCNT 



.WORD 100 

.WORD 60. 

.WORD 

. WORD 

.WORD 120. 

.WORD 120. 

.WORD 17. 

.WORD 62 



(INTERRUPT VECTOR ADDRESS OF THE UTC. 
(INTERRUPT FREQUENCY OF THE LTC. 
(HARDWARE CLOCK COUNTER #1. 
I HARDWARE CLOCK COUNTER #2. 
(HARDWARE BREAK COL»NTER LOCATION. 
(BREAK COUNT VALUE IN CLOCK TICKS. 
(NUMBER OF MILLI -SECONDS PER LTC TICK. 
(LOOP COU^'T (USED BY MSLOOP) TO DELAY 1 



MS 



: MEMMORY MANAGEMENT VARIABLES AND FLAGS. 

(ADDRESS OF MEM MGT STATUS REGISTER 00. 
(MEM MGT PRESENT FLAG (0 IF MM NOT PRESENT). 
(MEM MGT ENABLED FLAG (0 IF MM NOT ENABLED). 

TABLE OF WORDS WITH CORRESPONDING BIT SET FOR GENERATION OF BIT MAPS, 



MMSRO: : 


.WORD 


177572 


MMPRES: : 


.WORD 





MMENAB: t 


.WORD 






BITTBLj 






.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

GPR SAVE 



1 
2 
4 

10 

20 

40 

100 

200 

400 

1000 

2000 

4000 

10000 

20000 

40000 

100000 



(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 
(BIT 





I 

2 

3 

4 

5 

6 

7 

6 

9 

10 

11 

12 

15 

14 

15 



SET. 

SET. 

SET. 

SET. 

SET. 

SET. 

SET. 

SET. 

SET. 

SET. 
SET 
SET 
SET 
SET 
SET 
SET 



**«************4>***>***4i*****«******«*«*****4**«*4************** 



AREAS ZERO AND ONE. 



««««*«* 



GPRSOBj: 



(BASE OF GPR SAVE AREA NUMBER ZERO. 



t 

BMPCQP 
BMPCQB 
BMPCQE 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 

STORAGE AREA FOR THE BMP CODE QUEUE. 



(WORD 
(WORD 
J WORD 
(WORD 
(WORD 



I. 
2. 
3, 
4, 
5. 



STORAGE 
STORAGE 
STORAGE 
STORAGE 
STORAGE 



FOR 
FOR 
FOR 
FOR 
FOR 



Rl 
R2 
R5 
R4 



AREA FOR THE BMP CODE QUEUE. 



WORD 

BLKW 




64. 



(POINTER USED TO ACCESS THE NEXT CELL IN QUE 
(STORAGE FIR 52 CELLS. TEST* PLUS BMP COOt . 
(LAST ADDRESS PLUS 2 OF THE BMP CODE QltEUE . 



( 



002612 
002^.14 



000000 



( STORAGE AREA FOR ERROR SUMMARY TABLE ANO FLAGS. 

ERSMRF:: .WORD (FRROR SUMMARif FLAGS. 

ERCNTOj! .BLKW 16 (TABLE OF ERROR COUNTS. 
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SEQ 34 



1580 




1331 




1382 




1363 




1384 002650 




1385 002650 




1386 003250 




1387 003450 




1388 00361.0 




1589 003650 




1390 




1391 




1392 




1395 




1394 003710 




1395 




139o 




1397 




1398 




1399 




1400 




1401 




1402 005750 




1403 003750 


000000 


1404 003752 


000002 


1405 003754 


000004 


1406 003756 


000006 


1407 005760 


000010 


1408 003762 


000012 


1409 003764 


000014 


1410 003766 


000016 


1411 C03770 


000020 


1412 003/72 


000022 


1413 003774 


000024 


1414 003776 


000026 


1415 004000 


000030 


1416 004002 


000032 


1417 004004 


000034 


1418 004006 


000036 


1419 004010 




1420 




1421 




1422 




1423 




1424 




1425 




1426 004010 




1427 004010 


000 


1428 004011 


001 


1429 004012 


002 


14 50 004013 


003 


1431 004014 


004 


1452 004015 


005 


1435 004016 


006 


1434 0O4U17 


007 


1435 004C20 


010 


1436 004r^ri 


oil 



BUFBAS 






ERLTBL 


: .BLKW 


128. 


BUTMID 


: .BLKU 


64. 


BUr3QT 


: .BlKU 


64. 


BUTEND 






ENOETB 


: .BLKW 


16, 



; GENERAL TABLE AND BUFKER AREA -513 WORDS. 

(BASE or MEMORY BUFFER. 

(FIRST HALF OF GENERAL TABLE OR BUFFER. 

I SECOND HALF OF GENERAL TABLE OR BUFFER. 

(LAST QUARTER OF THE BUFFER AREA. 

I END OF GENERAL PURPOSE MEMORY BUFFER. 

) BUFFER OVERFLOW SPACE. 

J RECEPTION TABLE OF COUNTERS 

RXCNTB:: .BLKW 16, iRECEPTION CHARACTER COLWTERS TABLE, 

J* TABLE FOR STORAGE OF HX/TX LINE NUr«ER ASSOCIATIONS. 

;* THE ASSOCIATIONS ARE STORED AS LINE NUMBER TIMES 2 FOR USE AS OFFSETS 

;* WHEN ACCESSING A TABLE OF WORDS. 

i* NOTE: 00 NOT WRITE A NON-ZERO VALUE INTO THE UPPER BYTE OF ANY ENTRY. 

BASE OF TX/RX LINE NUMBER ASSOCIATION TABLE. 

TX/RX LINE OFFSET FOR RX/TX LINE 0. 

TX/RX LINE OFFSET FOR RX/TX LINE 1. 

TX/RX LINE OFFSET FOR RX/TX LINE 2. 

TX/RX LINE OFFSET FOR RX/TX LINE 3. 

TX/RX LINE OFFSET FOR RX/TX LINE 4. 

TX/RX LINE OFFSET FOR RX/TX LINE 5. 

TX/RX LINE OFFSET FOR RX/TX LINE 6. 

TX/RX LINE OFFSET FOR RX/TX LINE 7. 

TX/RX LINE OFFSET FOR RX/TX LINE 8. 

TX/RX LINE OFFSET FOR RX/TX LINE 9. 

TX/RX LINE OFFSET FOR RX/TX LINE 10. 

TX/RX LINE OFFSET FOR RX/TX LINE 11. 

TX/RX LINE OFFSET FOR RX/TX LINE 12. 

TX/RX LINE OFFSET FOR RX/TX LINE 13. 

TX/RX LINE OFFSET FOR RX/TX LINE 14. 

TX/RX LINE OFFSET FOR RX/TX LI^4E 15. 

END Of TX/RX LINE NUMBER ASSOCIATION 

GUARANTEE THAT NEXT TABLE IS ON WORD 



TXRXLB:: 




.WORD 





.WORD 


2. 


.WORD 


4. 


.WORD 


6. 


.WORD 


8. 


.WORD 


10, 


.WORD 


12, 


.WORD 


14. 


.WORD 


16. 


.WORD 


18. 


.WORD 


20. 


.WORD 


?2. 


.WORD 


24. 


.WORD 


26. 


.WORD 


28, 


.WORD 


30. 



TXRXLE 



.EVEN 



TABLE. 
BOUNOARl 



ASSOCIATION^ 



r: 



J* TABLE FOR STORAGE OF RX/TX LINE NUMBER 

!• THE ASSOCIATIONS ARE STORED AS LINE NUMBERS WHICH CAN BE USED AS SUCH OR 

;* AS OFFSETS WHEN ACCESSING A TABLE OF BYTES. 



TXRLNBj 



.SYTt: 





.BYTE 


1. 


.Btrt 


2 


.BtTt 


3, 


.B>TE 


4. 


.BYTE 


5. 


.BYTf 


6. 


.DYTF 


7. 


.BYTE 


8, 


.BYTE 


9. 



BASE OF TX/nX LINE NUMBER 
TX/RX LINE FOR RX/TX LINE 
TX/RX LINE FOR RX/TX LINE 
TX/RX LINE FOR RX/TX LINr 
TX/RX LINE FOR RX/TX LINE 
TX/RX LINE FOR RX/TX LINE 
TX/RX LINE FOR RX/TX LINE 
TX/RX LINE FOR RX/TX LINE 
TX/RX LINE FOR RX/TX LINK 
TX/RX LINE FOR RX/TX LINE 
TX/RX LINE FOR RX/TX LINE 



ASSOCIATION TABLE 

0. 

1. 

2. 

3. 

4. 

5. 

6. 

7. 

8. 

9. 



C^DHVBO .0-11 TUNC TST PART.? 
GLOBAL CA A StCTION 



1437 


00402c? 


012 


1438 


004023 


013 


1439 


004024 


014 


1440 


004025 


015 


1441 


004026 


016 


144^^ 


00402/' 


017 


1445 


004030 




1444 






1445 






1446 






144 7 






1448 






1449 






1450 






1451 






145? 


004030 




1453 


004030 


004 


1454 


004031 


006 


1455 


004032 


000 


1456 


004033 


002 


1457 


004034 


014 


1458 


004035 


016 


1459 


004036 


010 


1460 


004037 


012 


1461 


004040 


024 


1462 


004041 


026 


1463 


004042 


020 


1464 


004043 


022 


1465 


004044 


034 


1466 


004045 


)36 


1467 


004046 


030 


1468 


004047 


032 


1469 






1482 


004050 
004050 






004050 


000000 




004052 


000000 




004054 


000000 




004056 


000000 


1485 






1484 











J3 
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.BYTE 


10. 




.BYTE 


11. 




.BYTE 


12. 




.BYTE 


13. 




.BYTE 


14. 




.BYTE 


15. 




TXRLNEt ! 







SEQ 35 



iTX/RX LINE FOR RX/TX LINE 10. 
iTX/RX LINE FOR RX/TX LINE 11. 
iTX/RX LINE FOR RX/TX LINE 12. 
iTX/RX LINE FOR RX/TX LINE 13. 
iTX/RX LINE FOR RX/TX LINE 14. 
jTX/RX LINE FOR RX/TX LINE 15. 
(END OF TX/RX LINE NUMBER ASSOCIATION TABLE. 
.EVEN (GUARANTEE THAT NEXT TABLE IS ON WORD BOUNDARY. 

* TABLE OF TX/RX LINE NUMBER ASSOCIATIONS IN STAGGERED LOOPBACK. 

♦ THE ASSOCIATIONS ARE STORED AS LINE NUMBER TIMES 2 FOR USE AS OFFSETS 
< WHEN ACCESSING A TABLE OF UORDS . 

* THIS IS A TABLE OF DATA FOR READING ONLY. USE TO LOAD THE ABOVE TABLE. 

♦ NOTE: MUST CONVERT FROM BYTES TO UORDS WHEN LOADING ABOVE TABLE. 



5TGTRB: 


. 








.BYTE 


4. 






.BYTE 


6. 






.BYTE 









.BYTE 


2. 






.BYTE 


12. 






.BYTE 


14. 






.BYTE 


6. 






.BYTE 


10. 






.BYTE 


20. 






.BYTE 


22. 






.BYTE 


16. 






.BYTE 


18. 






.BYTE 


28. 






.BYTE 


30. 






.BYTE 


24. 






.BYTE 


26. 






.EVEN 








ERRTBL 






ERRTYP: 




.WORD 





ERRN6R; 




.WORD 





ERRMSG: 




.WORD 





ERRBLK: 




■ WORD 






iBASE OF STAGGERED 


TX/RX LINE NUMBER TABLE. 


1 TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


0, 


J TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


1. 


1 TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


2. 


1 TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


3. 


1 TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


4. 


I TX/RX 


LINE 


OFFSET 


r'OR 


RX/TX LINE 


5. 


I TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


6. 


iTX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


7. 


i TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


8. 


I TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


9. 


1 TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


10. 


t TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


11. 


1 TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


12. 


iTX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


13. 


J TX/RX 


L INE 


OFFSET 


FOR 


RX/TX LINE 


14. 


(TX/RX 


LINE 


OFFSET 


FOR 


RX/TX LINE 


15. 


iGUAr^ANTEE 


tHAT NEXT TABLE IS ON WORD BOUNDARY 










LJERRTBL: 


; 



.EVEN 



I<5 
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SEQ 36 



1486 
1487 

1488 
1489 
1490 
1491 
149? 
1493 
1494 
1495 
149b 
1497 
1498 
1499 
1500 
1501 
1502 
150? 
1504 

1505 
1506 
1507 
1508 
1509 
1510 
1511 
1512 
1513 
1514 
1515 
1516 
1517 
1518 
1519 
1520 
1521 
1522 



SBTTL GPR HANDLING ROUTINES FOR SUBROUTTNE CALLS. 

THERE ARE 4 ROUTINES AND MACRO DEFINITIONS USED FOR THE HANDLING OF 
GPR VALUES DURING SUBROUTINE CALLS WITHIN THIS PROGRAM. THE FOUR 
ROUTINES/MACRO CALLS HAVE THE FOLLOWING NAMES: 



» 
i* 

i* 
t* 

(* 

♦ 

* 
* 

I* 

i* 
J* 
;* 
J* 

* 

I* 
i* 

i* 

!* 

:♦ 

: * 



SAVE - MACRO DEFINITION USED AT THE BEGINNING OF A SUBROUTINE TO 
SAVE THE GPR CONTENTS FOR LATER RESTORATION, 

PASS - MACRO DEFINITION USED AT THE END OF A SUBROUTINE TO RESTORE 
THE PREVIOUSLY SAVED GPR CONTENTS AND TO LEAVE THE CONTENTS 
OF THE SPECIFIED GPRCS) INTACT (NOT RESTORED). 

PREG05 - SUBROUTINE WHICH IS CALLED FROM THE SAVE AND PASS MACRO 

EXPANSIONS WHICH ACTUALLY PERFORMS THE ACTIONS ON TH£ GPRS. 



DURING 
OF THE 



A SUBROUTINE WHICH 
GPRS ARE STORED ON 



USES THESE GPR SAVE ROUTINES THE 
THE STACK IN THE FOLLOWING STACK 



VALUES 
FRAME : 



SP 

SP*2 

SP*4 

SP*6 

SP*6 

SP*10 

SP*12 

SP»14 



- > 

- > 

- > 

- > 

- > 

- > 

- > 



RET PC INTO PREG05 
GPR RO CONTENTS. 
GPR Rl CONTENTS. 
GPR R2 CONTENTS. 
GPR R5 CONTENTS. 
GPR R4 CONTENTS. 
GPR R5 CONTENTS. 
RET PC INTO CALLER 



ROUTINE. 



EACH LEVcL OF S'JB'TNE CALLING USES 6 

THE SAVE AND PASS MACROS CAN ALSO BE 

TO SAVE AND RESTORE THE GPR VALUES. 

ISSUING OF A PASS CALL THE GPRS WILL 

THEY HAD PRIOR TO THE LAST SAVE CALL 

OR PASSED INTACT, GPRS SPECIFIED AS 

AND THE SP WILL ALSO BE RESTORED TO IIS CONDITION BEFORE THE. LAST 

SAVE CALL. THE PROGRAMMER MUST BE SURE THAT THE SP HAS THE SAME 

VALUE WHEN THE PASS MACRO IS CALLED AS IT HAD IMMEDIATELY AFTER 

THE SAVE MACRO WAS CALLED. 



OF SUB'TNE WHICH CALLED PREG05. 

WORDS OK STACK OVERHEAD. 
USED IN "STRAIGHT LINE CODE" 
IN ANY CASE, AFTER THE 
BE RESTORED TO THE VALUES 
(EXCEPT FOR THE EXCEPTED, 
PARAMETERS TO THE PASS CALL) 



4i**4i + 4i«**4^4t«4>4^4>4>*4>4>4^4>*«** + ***««*** + ***4i**4'4**i*«***«*«****4i*«*4'4L*4«*«**4L««4L44>* 
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SEQ 37 



lb2A 




15.-^5 




X5P.6 




lb2! 




1558 




1529 




15?0 




1531 


000036 


15.V 


000016 


155? 


000014 


1534 


000012 


1535 


000010 


1536 


000006 


1537 


000004 


153t5 


000002 



SBTTL GPR FRAME ACCESS EQUATES 

I EQUATES THAT ALLOW ACCESS TO THE STACK FRAME. 



THESE ARE THE 



jOFFSETS INTO THE STACK FOR REGISTERS SAVED DURING THE PREG05 
(ROUTINE. 



PC. 



LPCSLT-- 


36 


lOFFSET FOR LAST RETURN 


PCSL0T-- 


16 


J OFFSET FOR RETURN PC. 


R5SL0T-- 


14 


[OFFSET FOR R5. 


R4SL0T-- 


12 


; OFFSET FOR R4 . 


R3SL0T" 


10 


lOFFSET FOR R3. 


R2SL0T-- 


6 


I OFFSET FOR R2. 


RISLCT-- 


4 


jOFFSET FOR Rl. 


R0SL0T«» 


2 


J OFFSET FOR RO. 



M3 

1540 .SBTTL liLOSAL MACRO DEflNITION - SAVE - 

154^*^ I* ;I1IS MACRO 15 USED AT THE BEGINNING OF A SUBROUTINE TO SAVE THE 

1543 1* CONTENTS OF ' HF GPRS RO THRU R5. 

1544 ;♦ 

1545 t* INPUTS: SP - '..'NCHANGED SINCE SUBROUTINE WAS ENTERED 

1546 i* RSSLOr - OFFSET TO STACK SLOT FOR R5 CEQUATED TC 14 OCTAL) 
154 7 t* 

1548 J* OUTPUTS: GPR SA\/E AREA ON THE STACK IS LOADED WITH THE CONTENTS OF GPRS 

1549 ;* TOP OF STACK - LOADED WITH THE RETURN ADDRESS INTO PREG05 

1550 J ♦ 

1551 ;* CALLING oEQUENCE : SAVE 

1552 ;♦ 

155? ;* COMMENTS; NO ARGUMENTS ARE ALLOWED. 

1554 I* THE PASS MACRO SHOULD BE CALLED TO RESTORE THE GPR VALUES. 

1555 ;* 

1556 J* SUBORDINATE ROUTINES CALLED: PREG05. 

1558 

1559 .MACRO SAVE 

1560 .LIST 

1561 JSR R5.PREG05 jCALL REGISTER SAVE SUBPT. 

1562 .NLIST 

1563 .ENDM SAVE 



CZDHVBO OHUai FUNC TST PARTa 
GLOBAL MACRO DEFINITION 

1S65 
1566 

1567 

1568 

1569 

1570 

1571 

157c? 

1573 

1574 

1575 

1576 

1577 

1576 

1579 

1580 

1581 

158^ 

1583 

1584 

1585 

1586 

1587 

1588 

1589 

1590 

1591 

1592 

1595 

1594 

1595 

1596 

159.' 

1598 

1599 

1600 

1601 

160? 

160.^ 

1604 

1605 

1606 

1607 

1600 

1609 

16]n 

16K 
1612 
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SEQ 39 



.SBTTL GLOBAL MACRO DEFINITION - PAS5i - 



THIS MACRO IS USED IN CONJUNCTION WITH THE SAVE MACRO. IT IS 
CALLED AT END OF A SUBROUTINE TO PASS PARAMETERS IN GPRS BACK TO THE 
CALLING ROUTINE BY ALTERING THE GPR SAVE AREA ON THE STACK AND THEN 
RETURNING TO PRcGOS TO RESTORE THE GPRS TO THEIR SAVED VALUES. 



INPUTS: 



OUTPUTS: 



ONLY ALLOWED ARGUMENTS ARE "RO" THRU "R5". 

ROSLOT THRU R5SL0T MUST BE EQUATED TO THEIR RESPECTIVE GPR SAVE 
SLOT OFFSETS BEFORE CALLING THIS MACRO. 

THE GPR VALUES ARE PUT IN THEIR RESPECTIVE SLOTS ON THE STACK. 



CALLING SEQUENCE: 



PASS 



RO.Rl. . . . 



COMMENT S : 



ANY COMBINATION OF GPR ARGUMENTS MAY BE LISTED IN ANY ORDER. 
FOR EXAMPLE, THE FOLLOWING ARE LEGAL: 

PASS Rl 

PASS R4 RO R2 
THE GPRS LISTED As'aRGUMENTS WILL BE PASSED INTACT TO THE 
CALLING ROUTINE, ALL OTHER GPRS WILL BE RESTORED. 
THE SP MUST BE AT ITS ORIGINAL VALUE WHEN PASS IS CALLED. 



J* 

!* 

J* 
;♦ 

I* 

* 

J* 

A 

* 

* 

« 
* 
* 

1* 

;♦ 

:* SUBORDINATE ROUTINES CALLED: (PREGRT - LABEL WITHIN PREG05, VALUE ON STACK.) 

• ^^AA3^^.^*.*.*******'A****AA*■A*AA****~*A*~AA^AAAAA.J^AA*.i<'*^*.**>4.A^4<AAAAAAAA*'A*iA4■AAAA*.AAAA*A*~ 

.MACRO PASS A.B.C.D.E.F 
.IRP X,<A,B,C.D,E,F> 
.IF NB,X 

.LIST 

MOV X.X'SLOTCSP) 
.NLIST 
.ENDC 

.ENDM 
.LIST 

JSR PC,8(SP)^ 

.NLIST 
.ENDM PASS 



THE MACRO CALL 

PASS RO R3 
EXPANDS INTO THE FOLLOWING ASSEMBLY CODE 

MOV RO.ROSLOT(SP) 

MOV R3,R3SL0TCSP) 

JSR PC.S(SP)* 
IN THIS EXAMPLE GPRS Rl, R2, R4 , AND R5 WILL BE RESTORED TO 
THEIR VALUES CONTAINED IN THE STACK FRAME AND RO AND R3 
WILL BE LEFT AT THEIR VALUES PRIOR TO THIS PASS CALL 



PUT RO IN STACK SLOT. 
PUT R3 IN STACK SLOT. 
RETURN TO PREG05 SUBRT. 



{PUT X IN STACK SLOT. 



i RETURN TO PREG05 SUBRT. 



B4 



CZDHVBO OW 11 FUNC TST PARia 
GLOBAL SieROUTINE 



1614 

1615 

1616 

1617 

1616 

161** 

16^0 

16*? 1 

16^2 

1625 

1624 

1625 

1626 

162: 

1628 

162«> 

16J0 

1651 

1652 

1655 

1654 

1655 

1656 

1657 

1658 

1659 

1640 

1641 

1642 

1645 

1644 

1645 

1646 

1647 

1648 

1649 

1650 

1651 

1652 

1655 

1654 

1655 

1656 

1657 

1658 

1659 

1660 

1661 

1662 

1665 

1664 

1665 

166t/ 
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.SBTTL GLOBAL SUBROUTINE 



SEQ 40 



PREG05 



PRESERVE REGISTERS RO THROUGH R5 FOR SUBROUTINE CALLS. 



* 

* INPUTS t 

* 

• OUTPUTS! 

* 

♦CALLING SEQUENCE 1 

* 

•COMMENTS: 

* 

* 

* 

* 

•SUBORDINATE ROUTINES CALLED: 



THE RETURN ADDRESS BACK INTO THE CALLING ROUTINE MUST BE IN 
GPR R5. (I.E.- MACROS USE "JSR R5,PREG05' . ) 

REGISTERS RO THROUGH R5 ARE SAVED ON THE STACK. 

SAVE (MACRO EXPANSION CALLS . REG05. 

[SUBROUTINE CODE]. . . 

PASS I MACRO EXPANSION RECALLS PnEG05. 

THIS ROUTINE IS RE-ENTRANT. 

PARAMETERS MAY BE PASSED OUT OF A SUBROUTINE Br MOOIFriNG THE 

REGISTER SAVE AREA ON THE STACK. USE THE PASS GPRN MACRO 

TO RETURN GPR VALUES INTACT. 

USE THE RNSLOT OFFSETS FROM THE SP TO PASS OTHER PARAMETtRS. 

(EXAMPLE ; MOV VALUE .ROSLOK SP ) 1 

MAKE SURE THE SP IS AT ITS ORIGINAL VALUE WHEN tOU DO THIS. 

NONE. 



004060 
004060 
004062 
004064 
004066 
004070 
004072 
004074 



010446 
010546 
010246 
010146 
010046 
010546 
016605 



PREG05! 



000014 



004100 004 756 



MOV 
MOV 
MOW 
MOV 
MOi/ 
MOV 
MOV 

JSR 



R4. 
R5. 
R2. 
Rl. 
RO, 
R5. 



(SP) 
(ijP) 
(SP) 
-(SP) 
(SP) 
(SP) 



|R5 HAS BEEN LOADED ON THE STACK BY THE SUBROUTINE CALL 



I SAVE 
I SAVE 
I SAVE 
I SAVE 
I SAVE 
I PUSH 



R4 
R5 
R2 

Rl 
RO 
RETURN 



PC ON TOP OF STACK 



R5SL0T(SP),R5 iRESTORE R5 TO VALUE IT HAD BEFORE CALLS 



PC.S(SP)» 



004102 
004104 
004106 
004110 
004112 
004114 



012605 
012600 
012601 
012602 
012605 
0:.2604 



iCALL THE SUBROUTINE AT THE RETURN AOORfSS 
ifRO*! THE PREG05 CALL, PUTTING THE PRi.»;tNT 
|PC ON THE STACK AS A RETURN ADDRESS INTO 
I THIS (PREG05) ROUTINE. 



I THE rauOWlNG CODE IS EXECUTED WHEN THE CALLING ROUTINE DOES A 
r'RETURN" (JSR PC,a(SP).l USU'W THE PC DEPOjITED ON THE STACK ABOVt 
I 

IN R5. 



PREQRTji MOV 


(SP)..fl5 


|PUT RETURN PC 


MOV 


(SP)».flO 


1 RES TORE no. 


MOV 


(SP)'.Rl 


iRESTORE '^1. 


MOV 


(SP)..R2 


iRESTORt R2. 


MOV 


(SP W.R^ 


(RESTORE R5. 


MOV 


(SP)t,R4 


(RESTORE R4. 



004 I 16 000205 



RTS 



R5 



iRtTURN TO THf ^UBROUTINf. WHICH CALLtO PRt^^Ot^. 
iRLSTORING R5 IN THt PROCESS* 



6(^egrTPw-^^c'i"y8fi 
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SEQ 41 



T2/ 



lfeb8 








t 


16^6 










16 r: 










1678 










Ib'"^ 










1680 










1681 










168^ 










1685 










1684 










168^ 










1686 










1687 


0041^0 
004120 










004120 


104 


llO 


125 




004125 


055 


061 


061 




004126 


000 






1688 










16^ 










169^:^ 








1 


1696 








; 


1697 


004130 
004150 










004130 


104 


no 


125 




004133 


055 


061 


061 




004136 


040 


106 


125 




004141 


116 


103 


040 




004144 


124 


125 


124 




004147 


040 


120 


101 




004152 


122 


124 


0^2 




004X5^ 


000 






1698 










1699 










1706 











.fiSTTL GLOBAL TtXT SECTION 



♦ t 



THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
MORE THAN ONE TEST. 



NAMES OF DEVICES SUPPORTED BY PROGRAM 
DEVTYP ^DHU-11* 



LJDVTYPi : 



,ASCIZ /DHU-11/ 



.EVEN 



; TEST DESCRIPTION 
DE SCRIPT 



<OHU"ll FUNC TST PART2> 



LJOESCi! 



.ASCI/ /DHU-ll FUNC T^T PAR 



.EVEN 



.EVEN 



C20HVB0 OHV 
GLOBAL TEXT 

1715 
1716 

ia7 

17: ', 



u r'jNC 

SECUON 
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5EQ 42 



17<:.' 
17;:? 

17 c\. 

1/25 
3 726 
1"27 
1720 
1729 
1730 
1731 
1732 
1755 
1734 
1735 
1736 
1757 
1738 
1759 
1740 
1741 



004156 
004163 
004215 
004270 
004320 
004350 
00*1417 
004455 
004537 
004611 
004640 
004670 
004721 
004745 
005054 
005053 
005131 
005231 



,NLJ.ST BIN 



F-r0503 
EF1601 
F.F5801 
EF5901 
Er5902 
EFMOl 
EF7eOl 
EF9001 
EF9002 
EF9003 
EF9004 
EF9005 
Ef9006 
EF9010 
EF9019 
EF9301 
EF9502 
MFUNIT 



( 4.«A**4.*«* FORMAT STATEMENTS USED IN PRINT CALLS ♦♦♦»♦♦*»♦ 

.ASCir /*T#N/ 

.ASCI? /*A urupi, TEST ABORTED #N/ 

.ASCIZ /*A RXTI^CR VALUE USED WAS ii*D5i<A CD)i<N/ 

.ASCTZ /<A EXPECTED :#D3#A(0)iiN/ 

.ASCIZ /liA ACTUAL :#D3i<ACD)#N/ 

.ASCIZ /«A #D2i<N/ 

.ASCIZ /#Ti<A ON LINE #02*A DECIMAL. #N/ 

.ASCIZ /*A UNEXPECTED i<Ti<A FOUND IN RECEIVE CHAR FIF0;KN/ 
.ASCIZ /*A CODE IS ASSOCIATED WITH LINE; «D2*N/ 

.ASCIZ /i^A CODE IS: #03*N/ 

.ASCIZ /*A KTftA VALUE: #03#N/ 

.ASCIZ /KA UKA VALUE: N0NE<N/ 

.ASCIZ /#A HJHA #02i*ACD)*N/ 

.ASCIZ /#A NUMBER OF ERRORS DEitCTtT; ON LINE i<D2i<A IS «D5*N/ 

.ASCIZ /^A *TiiA #06*N/ 

.ASCIZ /»*A KT#02KA(0). BMP CODE RcPi;f^Tro :»(03*A(0")*N/ 

.ASCIZ /#A OVERFLOW OCCURRED (MORL TriAN 31 BMP CODES FOUND IN QU£Ut:)KN/ 
.ASCIZ /*Ni<A TESTING UNIT iHOA^H^ 
.EVEN 

.LIST BIN 
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SEQ 43 



r/so 

1751 

175.^ 

17?5 

1 734 

1755 

1756 

1757 

1758 

1759 

1760 

1761 

176? 

1763 

1764 

1765 

1766 

1767 

1768 

1*69 

1770 

1771 

1772 

1773 

1774 

1775 

1776 

1777 

1778 

1779 

1780 

1781 

1783 

1783 

1784 

1785 

1786 

1787 

1788 

1781 

1790 

1791 

1792 

1793 

1794 

1795 

1796 

1797 

1798 

1799 

1800 

1801 

1802 

180?. 

180^1 

180'.S 

1806 



005262 

005320 

005403 

005435 

005471 

005523 

005557 

005643 

005675 

005717 

005760 

006012 

006051 

006106 

006144 

006174 

006227 

006265 

006321 

006401 

006452 

006520 

006S61 

006625 

006702 

006757 

007003 

007077 

00720:. 

007265 

007346 

007102 

0074 76 

007570 

00/654 

00"754 

010000 

0.1 0040 

010120 

010165 

010243 

010307 

010544 

010405 

010442 

010514 

010546 

010623 

010647 

010675 

010767 



.NLIST bIN 



tM0103 
EM1601 
EM4001 
EM4002 
EM4101 
EM4102 
EM4103 
EM4201 
EM4202 
EH4901 
"^902 
tliSOOl 
EM5101 
EMS 102 
EM5103 
EM5201 
EM5202 
EM5301 
EM5302 
EM5303 
EM5401 
EM5402 
EM5501 
EM5601 
EM5701 
EMSeOi 
EM5802 
EM5803 
EM5804 

EMseos 

EM5901 
EH5902 
EM5903 
EM5904 
EM5905 
EM6001 
EM6002 
EM6003 
EM6004 
Eh6005 
Eri6006 
EM6401 
EM6402 
Eh6601 
FM6602 
EM6701 
EM6702 
EH9009 
EM9010 
IlM9014 

EM9017 



{4«4.«*4^4>*** GLOBAL ERROR MESSAGES i^*********** 



.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 

.a:.ciz 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCTZ 
.ASCiZ 
.ASCIZ 
.hSCIZ 
.ASCIZ 
.ASCIZ 

.Ascir 

.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCI/ 
.ASCII 



/DEVICE REGISTER ACCESS FRRORS/ 

/TIMEOUT OCCURRED WAITirKj KOR MASTER RESET TO CLEAR/ 

/DMA START BIT TEST KAIl EO/ 

BIT BAD ON LlNr: / 

BIT TES. KAil.PD/ 

BIT BAD ON LINE: / 

BIT FOUND SET AFTER DMA ABORTED ON LINE: , 

BIT TEST FAILED/ 

BIT BAD^ 

AILED/ 



/DMA START 
/DMA ABORT 
/DMA ABORT 
/DMA START 
/DMA ERROR 
/DMA ERROR 



/OAUTO (INACTIVE) BIT Vr"T 
/ OAUTO EIT BAD ON LINE: / 
/OAUTO (ACTIVE) BIT TEST FAILED/ 
(INACTIVE) TEST FAILED/ 



BIT FOiJNO SET 0^J LINE: 
BIT BAD ON LXNti / 
(ACTIVE) TEST FATLED/ 
BIT FOUND CLR ON LINE: 
TEST 



/lAUTO 

/lAUTO 

/lAUTO 

/lAUTO 

/lAUTO BIT FOUND CLR ON LINE: / 

/FIFO VALID OAia TEST FAILED/ 

/FIFO BAD. DATA FIELD CORRUPTED. TEST USED LINE;/ 

/BMP CODE FOUND IN riFO, TEST INVAILOATED/ 

\FIFO 3/4 ALARM (INACTIVE) TEST FAILEDN 
BAD, ALARM SIGNAL DEFECTIVE/ 
3/4 ALARM (ACTIVE) TEST FAILE0\ 
3/4 ALARM (ACTIVE/INACTIVE) TEST FAILEDN 
1/2 LEVEL (ACTIVE/INACTIVE) TEST FAILEDS 



/FIFO 
\FIFO 
\FIFO 
\FIFO 

/RXTIMER TEST 
/RXTIMER BAi), 
\RXTIMER BAD. 
/RXTIMER BAD. 
/RXTIMER PAD, 
/ TX-ACriON 
TX ACTION 



'AI,.EO/ 

;^X-INT DELAYED BY WRONG NUMBER OF MILLISECONDS/ 

RX-INT DIDN'T OCCUR IMMEDIATELY WITH RXFIFO 3/4 FULL\ 

RX-INT OCCURED WITH RXTIMER VALUE ZERO/ 

TIME-OUT CCC'JREO WAITING FOR HX-INT/ 
FIFO TEST FAILED/ 
FaFO BA0» TX-ACriON RECIEVED FROM THE WRONG LINE/ 



TX ACTTON FIFO BAD, INCORRCCT NUMBER OF TX -ACTIONS FQUNO/ 

TX ACTION FI1--0 BAD, TX-ACTION FIFO WOULD NOT EMPTY/ 

TX INTERRUPT OCCURED AKfER THE TX ACTION FIFO HAD BEEN EMPTIED/ 

/TX FIFO TEST FAILED/ 

/INCORRECT VALUE IN FIFOSIZE REG/ 

/MORE THAN ONE TX-INT OCCURED. FROM A FULL TXFIFQ/ 

/TX FIFO BAD, RECIEVED CHAR INCORRECT/ 

/TX FIFO BAD. CHARACItR f^ECIEVEO ON WRONG LINE/ 

/TX FIFO BAD, TOO FEW CHARS RECIEVED/ 

/BREAK GENERATION TEST *^ATLED/ 

/ BREAK NOT RECEIVED ON LINECf);/ 

/NO OVERR'JN ERROR VESf t- AILED/ 

/ OVERRUN ERROR RF.POSTED WHEN NONE FORCED/ 

/OVERRUN ERROR TEST FAILED/ 

/ NO OVERRURU ERROR REPUHTFD, OVERRUN FORCED/ 

/EXPECTED OR CORRfCT/ 

/ACTUAL OR HtASURED / 

/SUMMARr REPORTS FOR L INF'3 WITH EXCESSIVE NliMBERS OF ERRORS;/ 

/ FIFO WILL NOT PUPGt (DATA. VALID STUCK SET)./ 



sfSBxriPwiicW^s ''' "'^'' 
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F4 
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SEQ 44 



18C; 011044 

1808 011100 

1809 01112ft 

1810 011200 
18U 011257 
1812 01130? 
lt?l?. 01X554 
1814 

1815 



EM9026 
EM9104 
EM9301 
EM9302 
EM9303 
tM9304 



.ASCIZ / REMAINDER OF TEST SKIPPED./ 

.ASCIZ / I.PR CONTENTS: / 

.ASCIZ / UNEXPECTED DATA FOUND IN "-'IFO FROM LINi:; / 

.ASCIZ /BMP CODES WERE REPORTED Ol«ING THIS DIAGNOSTIC/ 

, ASCIZ /BMP CODE FOUND IN TEST / 

.ASCIZ /THE ..AST BMP CODE WAS FOUND IN TEST / 

.ASCIZ /UNEXPECTED BMP CODES FOUND DURING TH:|.S PASS/ 
.EVEN 

.LIST BIN 



G4 



CZDHVBO DHU-U i'VUC TST PARTS MACRO M1200 l5-riAR-a4 O^j^^O PAGH 37 SEQ 45 

GLOBAL TEXr SECTION 

l«.-?6 .SBTTL GLOBAL ERROR RLPORT SECTION 

1829 I THE GLOBAL ERROK l^iLr^ORT SECTION CONTAINS MESSAGE PRINTING AREAS 

1850 1 USED BY MORE THA^■ 1>ME TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTO 

:«?! J (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 

1632 ; - - 



H4 



CZDHVBO DHU-11 TUNC TST PART2 
GLOBAL t:RROR ftF.PORTING ROUTINE 



1834 
1835 
1356 
185 7 
1858 
1859 
1840 
1841 
184c^ 
1845 
1844 
1845 
1846 
184 7 
1848 
1849 
1850 
1851 
1852 
1855 
1854 
1855 
1856 
1857 
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SEQ 46 



1858 

1859 
1660 
1661 
186? 
1865 
1864 
1865 
1866 
18'>7 
18-6 
r669 



le-'o 

1871 
1872 



1873 



011430 
011450 
011430 
011450 

011434 
011440 
011444 



011446 
011452 
011454 
011454 
011460 
011464 
011466 
011470 
011474 
011500 
011502 
011502 
011506 
011512 
011514 
011516 
011522 
011522 
011526 
011532 
011534 
011b36 



004567 172424 

012700 000100 

046700 170544 
001036 



032705 
001410 

012746 
012746 
010600 
104414 
062706 
052705 
001410 

012746 
012746 
010600 
104414 
062706 

012746 
012746 
010600 
104415 
062706 



000001 



011546 
000001 



000004 
000002 



011624 
000001 



000004 

011705 
000001 



0OO0Q4 



.SB 

J** 

:• 
! * 
!• 

i* 
i* 
J* 
;* 
;♦ 
1* 
I* 
t > 
I* 
I* 
i* 
J* 
;♦ 
;* 
;• 
i* 
I** 



TTL GLOBAL ERROR REPORTING ROUTINE - ERClOl - 

THIS IS AN L'RkOR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INrORMATION I'r AN ERROR IS DETECTED IN TEST 1 (REGISTER ADDRESS 
ACCt-SS test:;, if the "extended error INFO" option HAS BEEN SELECTED 
THrN THIS SUnr.OUTINE will report the TYPE of access (READ OR WRITE OR 
BOTH) WHIC'i CAUSED A BUS TIME-OUT TRAP (004 TRAP). A MESSAGE INDICATING 
THAT THE DUi MAY BE AT THE WRONG UNIBUS ADDRESS IS ALSO PRINTED. 



INPUTS; 



OUTPUTS 



Rb - ERROR FLAG WORD. 

IF BIT IS SET 
If BIT I IS SET 



A READ ERROR OCCURED. 
A WRITE ERROR OCCURED 



i1ES^/\GES ARE PRINTED AT THE OPERATOR CONSOLE. 



CALLING SCQUENCE: 



COMMENTS: 



INCLUDE THE LABEL "EROlOl" AS THE MESSAGE POINTER 
PARAMETER IN THE ORS ERROR REPORT MACRO CALL. 



SUeOROINATE ROuriNt'^^ USED: NONE. 

i,^*t^t^ .^****^^**t^^*t^i^******tn******************^***********************i*^**** 



8GNMSG e.ROlOl 
SAVE 



JSR 



MOV 
SIC 
BNE 



<HU!06.RC 
rf-^TtON.RO 
6» 



EROlOl; : 
iSAVE THE GPR CONTENTS. 
R5,PREG05 iCALL REGISTER SAVE SUBRT. 

I SET -UP THE BIT MAP FOR 'REPORT EXT'D ERROR INFO' 
I IRY AND CLEAR THE FLAG. 
lEXIT IF OPTION NOT SELECTED. 



I » 



REPOF.T EXTFNOED L.RROR XNFOMATION 



BIT <WTTC.R5 

BEQ 2^ 

PR^.NTB OMSGl 



2*: 



GIT oern .R5 

BED Mi 

PRINTB ^MSr,2 



44: 



PRXNTX iimoi 



(TEST FOR READ ERROR. 

iSKTP READ ERROR MSG IF NO READ ERROR. 

iPRINT READ ERROR MESSAGE. 

MOV 

MOV 

MOV 

TRAP 

ADD 

;TEST FOR WRITE ERROR. 

jSKiP WRITE ERROR HSG IF NO WRITE ERROR 

(PRINT WRITE ERROR MEbSAGE, 

MOV 

MOV 

MOV 

TRAP 

ADD 

i^iUUGEST THAI OHU MAt U£ AT WRONG ADDRE 

MOV 
MOV 
MOV 
TRAP 

ADD 



imSGl. (SP) 
^1, tSP) 
SP.RO 
CiPNTB 
04. SP 



^M^G2. (SP) 
01, -(SP) 
SP.MO 
CtPNTB 
04, SP 
SS. 
*M';b5. K^Py 

01, !.SP) 

SP,RO 

CJPNTK 
54 /jP 



CZDHVBO DHl'-ll F"UNC TST PART? 
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14 
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1674 0U54^ 








0U542 


004736 






1875 011544 








011544 








0U544 


104423 






1876 








1677 011546 


045 


101 


102 


011551 


125 


123 


040 


011554 


124 


111 


115 


011557 


105 


055 


117 


011562 


125 


124 


040 


01156S 


124 


122 


101 


011570 


120 


040 


103 


011573 


101 


125 


123 


011576 


105 


104 


040 


011601 


102 


131 


040 


011604 


122 


105 


101 


011607 


104 


040 


101 


011612 


124 


124 


105 


011615 


115 


120 


124 


011620 


056 


045 


116 


011623 


000 






1678 011624 


045 


101 


102 


011627 


125 


123 


04 


011632 


124 


111 


115 


011635 


105 


055 


117 


011640 


125 


124 


040 


011643 


124 


122 


101 


011646 


120 


040 


103 


0U651 


101 


125 


125 


on 654 


105 


104 


O40 


011657 


102 


131 


040 


011662 


127 


122 


in 


011665 


124 


105 


040 


011670 


101 


124 


124 


011675 


105 


115 


120 


011676 


124 


056 


045 


011701 


116 


000 




1879 011703 


045 


101 


104 


011/06 


110 


125 


040 


011711 


115 


101 


151 


011714 


040 


102 


105 


011717 


040 


101 


124 


011722 


040 


12*' 


110 


011725 


105 


040 


127 


011730 


122 


117 


116 


011753 


107 


040 


irii 


011756 


116 


111 


102 


011741 


125 


125 


040 


011744 


101 


i04 


104 


Oil 74/ 


122 


105 


123 


0J17'32 


125 


056 


045 


011:55 


116 


045 


116 


011760 


000 






1880 








1881 









6i: 



PASS 
Eh.DMSr 



09:28 PAGE 38-1 



JSR 



SEQ 47 



I RESTORE THE GPR CONTENTS. 



PC,a(SP)<' 



iRETURN TO PREG05 SUBRT. 
L 10002: 



TRAP 



CJMSG 



MSGl:? .ASCI/ /lEiAUUS TIME-OUT TRAP CAUSED BY READ ATTEMPT. liN/ 



MSG2:: .ASCT^ /©AU^S TIME-OUT TRAP CAUSED BY WRITE ATTEMPT, KN/ 



MSG3;: .ASCIZ /itADHU MAr BE AT THE WRONG UNIOUS AODRESS,i<MN/ 



.tVLN 



C7DHVB0 DHU-ll TUNC TST PART2 
GLOBAL ERROR REPORTING ROUTINE 

1683 
1884 
1805 
1886 
1887 
1868 
1889 
1390 
1891 
1892 
1893 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 
1902 

1903 
1904 
1905 
1906 
1907 
1908 
1909 



MACRO Ml 200 IS-^MAF, 
- t:R0503 - 



J 4 

■:)'. 09:28 PAGt 39 



SBQ 48 



011762 
0U762 

011762 
011766 
011772 



1910 
1911 



011774 
011774 
011776 
012002 
012006 
012010 
012012 

012016 
012016 
012016 



010146 
012746 
012746 
010600 
104414 
062706 



104423 



.SBTTL !•■ O'j/, f^ftROR RfP'jinXNG ROUTINF. - ER0503 - 

* THT'> rS AN ERROR RtPOPTING SUBROUTINE WHICH PRINTS AN ADDITIONAL ERROR 

* MESSAGE WHOSE AJDRES5 IS PASSED AS AN INPUT PARAMETER. PROVIDED 

* XV'NOED l-RROn REPORTING HAS BEEN REQUESTED. 
* 

* INPMo: m - ADDRESS OF THE MESSAGE TO PRINT. 

* OU^i'^UTr: A Mr.SSAGES If, PRiNTED AT THE OPERATOR CONSOLE. 
* 

* CALLING .SEQUENCE: LOAD TMK ADDRESS OF THE MESSAGE IN Rl. 

* INCLUDE IME LABEL "ER0503" AS THE MESSAGE POINTER 

* PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 
* 

» COMMrri^S; ''-IE MrSI^AGE IS PRINT^IU AS BASIC ERROR INFORMATION. 

* SlfiORO.NArE ROUIINES USED: NONE. 



BGhW^SG ER0503 



ER0503: : 



012700 COOIOO 
046700 170216 
001011 



V,0\! 


^ITOt.,HO 


wiC 


OPTION. no 


BNt 


2* 



PRINTS OEF0503 Rl 



I TRY TO CLEAR THE 

jlXT'J ERROR REPORTING FLAG 

(EXIT IF FLAG NOT SET. 



iFRINT THE MESSAGE. 



004156 
000002 



000006 



2$: 



ENDMSG 





MOV 


Rl. -CSP) 




MOV 


«€F0503. 




MOV 


<>2.-(SP) 




MOV 


SP.RO 




TRAP 


C^PN'B 




ADD 


^6 , SP 


H0003. 







(bp) 



TRAP 



CJM'JG 



K4 
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SEQ 49 



191? 








1914 








191«^ 








1916 








1917 








1916 








1019 








1920 








1921 








1922 








192? 








1924 








1925 








1926 








1927 








1926 








192^ 








19?0 








1931 








1^32 








1935 








jqxii 








1935 


012020 
012020 






197.6 


012020 








012020 


004567 


172034 


1937 








1958 


012024 


012700 


000100 


1939 


012030 


046700 


170154 


19^0 


012034 


001024 




1941 








1942 








1943 


012036 








012036 


010146 






012040 


012746 


004156 




012044 


012746 


000002 




012050 


010600 






012052 


104414 






012054 


062706 


000006 


1944 








1945 


012060 


016702 


171770 


1946 


012064 








012064 


010246 






012066 


012746 


004165 




012C72 


012746 


000002 




012076 


010600 






012100 


104414 






012102 


062706 


000006 


194/ 








1948 


012106 








012106 


004 736 




1949 


012110 
012110 








012110 


104423 





Rl - CONTAINS THE ADDRESS OF THE MESSAGE TO BE PRINTED. 
ERRMSG - CONTAINS THE ADDRESS OF THE MESSAGE THAT INDICATES 
THE TEST THAT IS BEING PERFORMED. EG DMA. BREAK ETC. 

MESSAGES ARE PFvINTED AT THE OPERATORS CONSOLE. 
"TESTNAME TEST ABORTED" 



.SBTTl GLOBAL ERROR REPORTING ROUTINE - ER1603 - 

i* THIS ERROR REPORTING ROUTINE IS USED TO PRINT OUT A BASIC ERROR 

I* MESSAGE. ALONG WITH A MESSAGE INFORMING THE OPERATOR WHICH TEST IS 

J* ABOLIT TO OE ABORTED, PROVIDED EXTENDED ERROR INFOMATION HAS BEEN 

1* REQUESTED. OTHERWISE ONLY A "TEST FAILURE" MESSAGE WILL BE PRINTED. 

i* 

I* INPUTS; 

1* 

1* 

I* OUTPUTS: 

;• 

i* 

(♦ CALLING SEQUENCE: 

I* 

i* 

;♦ COMMENTS: 

I* 

;* 

1* SUBORDINATE ROUTINES CALLED: NONE. 

BGNMSG ER1603 

ER1605: : 
SAVE ;SAVE THE CONTENTS OF THE GPRS. 

JSR R5.PREG05 (CALL REGISTER SAVE SUBRT. 



INCL'JOE THE LABLE "ER1603" 
PARAMETER IN THE DPS ERROR 



A? THE MESSAGE POINTER 
REPORT MACRO CALL. 



MOV 
BIC 
BNE 



*BIT06,RO 
OPT ION, RO 
2$ 



PRINTB 0EFO5O3.R1 



[TRY TO CLEAR THE 

lEXT'D ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 



iPRlNT bASIC MESSAGE ON OPERATORS CONSOLE. 



MOV ERRMSG. R2 
PRINTB «EF1601.R2 



iGfT THE "TEST MtSSAGE'". 
iPRINT "TEST ABORTED" MESSAGE. 



MOV 


Rl. CSP) 




MOV 


*EF0503,- 


•CSP) 


MOV 


02, fSP) 




MOV 


SP.RO 




TRAP 


CUNTB 




ADD 


06. SP 




MOV 


Ri . -CSP) 




MOV 


Off 1601.- 


•CSP> 


MOV 


02. CSP) 




MOV 


SP.RO 




TRAP 


CJPNTB 




ADD 


06. SP 





2$: 



PA*;s 

ENUMSG 



;REST0RE THE CONTENTS 0^ THE GPRS. 
JSR PC.BCSP). 



J RE TURN TO PREG05 SL^BRT. 
L 10004: 



TRAP 



CSMSci 



L4 



GUoilXl-^FSRHR RtiPGRTlN^ ROUTINB 



MACRO H120( 



;R5 



ii 
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3tCl 50 



19S1 
1952 
1955 
1954 
1955 
1956 
1957 
1958 
1959 
1960 
1961 
1962 
195? 
1964 
1965 
1966 
196 V 
1968 
1969 

i9:o 

1971 
1972 

1973 

1974 
1975 
1976 
1977 



1978 



1979 



012112 
012112 
012112 
012120 

012122 
012122 
012124 
012130 
012134 
012136 
012140 

0i;:i4A 

012144 
0i2146 
012152 
012156 
012160 
0121C2 
012166 
012166 
012166 



032767 
001422 



0:0146 
012746 
012746 
010\S00 
104414 
0627v")6 

010240 
012746 
012746 
010600 
104414 
062706 



104423 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - tR5801 - 



THIS IS AN ERROR REPORTING ROUTINE WHICH PRINTS THE MESSAGE PASSED 
AS A PARAMETER IN Rl, AND THE RXTIHER VALUE IN R2, PROVIDED 
EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 
THIS ROUTINE IS USED BY THE RXTIMER TEST. 



INPUTS: 



OUTPUTS: 



Rl 
R2 



- ADDRESS OF THE. MESSAGE TO PRINT. 

- RXTIMER VALUE. 



! * 

I ♦ 

;♦ 

I* 

t* 

i* 

;* 

J* 

;♦ 

;* 

;* 

;♦ CALLING SEQUENCE: 

J* 

I* 

J* COMMENTS; THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION AND THE 

i* RXTIMER VALUE IS PRINTED AS A 3 DIGIT DECIMAL NUMBER. 

i* 

;* SUBORDINATE ROUTINES USED: NONE. 



THE MESSAGE FOLLOWED BY THE RXTIMER VALUE ARE PRINTED AT 
THE OPERATOR CONSOLE. 

INCLUDE THE LABEL ER5801 AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



000100 170070 



004156 
000002 



BGNMSG ER5801 

BIT «BIT06, OPTION 

BEQ Pi 

PRINTB «EF0503.R1 



EH5801: ; 
iHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
jEXIT WITH "TEST FAILED" MCSSAGE IF NOT. 



000006 



004215 
000002 



000006 



PRINTB <?EF580X.R2 



a$: 



ENDMSG 



MOV 


Rl, -(SP"v 


MOV 


^F0505, -CSP) 


MOV 


02, (SP) 


MOV 


SP.RO 


TRAP 


CiPNTB 


ADD 


06. SP 


MOV 


R2. -(5P) 


MOV 


OEF5801. -(SP) 


MOV 


02, -(SP) 


MOV 


SP.RO 


TRAP 


CiPNTB 


ADD 


06, SP 


UlOOObi 





TRAP 



C5M5G 



M4 
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1981 
1982 
1983 
1984 
1985 
1986 
1987 
1988 
1989 
1990 
1991 
1992 
1993 
1994 
1995 
1996 
1997 
1998 
1999 
2000 
2001 
2002 
2003 
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SEQ 51 



2004 
2005 

2006 

2007 
2008 
2009 
2010 
2011 
2012 
2013 
2014 



012170 
012170 

012170 
012170 

012174 
012202 



004567 

032767 
001433 



2015 



2016 



2017 



012204 
012204 
012206 
012212 
012216 
012220 
012222 
012226 
012226 
012230 
01c 234 
012240 
012242 
012244 
012250 
012250 
012252 
012256 
012262 
012264 
012266 



010346 
012746 
012746 
010600 
104414 
062706 

010146 
012746 
012746 
010600 
104415 
062706 

010246 
012746 
012746 
010600 
104415 
062706 



SBTTL GLOBAL ERROR REPORTING ROUTINE - ER5901 - 



THIS IS AN ERROR REPORTING ROUTINE ulHICH 
MESSAGE IN ADDITION TO THE "TEST FAILED" 
MESSAGE SHOWING THE EXPECTED VALUE OF A 
ACTUAL VALUE OF THAT DATA. THE DATA IS 
DECIMAL NUMBER. 



PRINTS AN ADDITIONAL 
MESSAGE AND ALSO A 
PIECE OF DATA AND THE 
PRINTED AS A 3 DIGIT 



INPUIS 



OUTPUTS 



Rl 
R2 
R3 



EXPECTED VALUE OF DATA. 

ACTUAL VALUE OF DATA. 

ADDRESS OF THE MESSAGE TO PRINT 



* 

♦ 
* 
* 

♦ 

: * 

;* 

;* 

; ************ **************************************4'**** ****** ***************** 



MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE 



CALLING SEQUENCE: 



COMMENTS 



INCLUDE THE LABEL "ER5901'- 
PARAMETER IN THE DRS ERROR 



AS THE 
REPORT 



MESSAGE POINTER 
MACRO CALL. 



SUBORDINATE ROUTINES USED : NONE 



BGNMSG ER5901 



171664 
COO 100 



170006 



SAVE 



BIT 
BEQ 



JSR 

<^BIT06. OPTION 
60$ 



tR5901: : 

tSAVE THE GPR CONTENTS. 

R5,PREG05 ;CALL REGISTER SAVE SUBRT 

lEXIT THE ROUTINE IF EXTENDED 

I ERROR REPORTING lb NOT REQUESTED. 



J REPORT EXTENDED ERROR INFOMATION 
PRINTS #EF0503,R3 



004156 
000002 



000006 



004270 
000002 



000006 



004 320 
000002 



000006 



PRINTX V?EF5901.R1 



PRINTX V?EF5902.R2 



jPRINT THE MESSAGE. 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 

J PRINT THE "EXPECTED VALUE" MESSAGE. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

; PRINT THE "ACTUAL VALUE" MESSAGE. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 



R3.-(SP) 
OEF0503, -CSP) 
i>2, (SP) 
SP.RO 
CJPNTB 
*6.SP 

Rl, (SP) 
*EF5901. -(SP) 

*2, -CSP) 
SP.RO 
CJPNTX 
«6.SP 

R2. (SP) 
«tK5902, -CSP) 
^2, -(SP) 
SP.RO 
C$PNTX 
ifb , SP 



N4 



CZDHVBO DHU-11 TUNC TST PART2 MACRO M1200 15-MAR-8'^ 09:26 PAGE 42- 1 SEQ 52 

GLOBAL ERROR REPORTING ROUTINE - ER5901 - 

2018 012272 60$: PASS [RESTORE THE GPR CONTENTS, 

012272 004736 JSR PC.QCSP)* jRETURN TO PREG05 SUBRT. 

20 T^ 

2020 012274 ENDMSG 

012274 L10006: 

012274 104423 TRAP C$MSG 



■V". 



B 



r. 



CZDHVBO DHUli TUNC TST PART2 
GLOBAL ERROR RE.PORTING ROUTINE 



MACRO lilSOO 15 -MAR -84 
■ ER6001 - 



09i28 PAGE 43 



SEQ 53 



2022 








2025 








2024 








2025 








2026 








2027 








2028 








202*^ 








2050 








2051 








2052 








2035 








2054 








20?^ 








2056 








2057 








2058 








205*) 








2040 








2041 








2042 








2045 








2044 








2045 








2046 








.'047 








2048 


012276 
012276 






2049 








2050 


012276 


032767 


000100 


2051 


012304 


001434 




2052 








2053 








2054 








2055 


012506 








012306 


01O446 






012310 


010346 






012312 


012746 


004417 




012516 


012746 


000003 




012522 


010600 






012524 


104414 






012326 


062706 


000010 


2056 


012332 








012332 


010146 






012354 


012746 


004270 




012340 


012746 


000002 




012544 


010600 






012546 


104415 






012350 


062706 


000006 


2057 


012354 








012554 


010246 






012356 


012746 


004 520 




012562 


012746 


000002 




012566 


010600 






012370 


104415 






012372 


062 706 


000006 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER6001 - 

THIS IS AN ERROR REPORTING ROUTINE WHICH PRINTS OUT A MESSAGE 

AT THE CONSOLE INFORMING THE OPERATOR OF AN ERROR ON A PARTICULAR 

LINE. THE ROUTINE ALSO PRINTS OUT A MESSAGE INFORMING THE OPERATOR 

OF WHAT DATA WAS "EXPECTED" AND WHAT "ACTUAL" DA' A WAS FOUND. IN THE 

FORM OF A 3 DIGIT DECIMAL NUMBER. 

IF fiXTENOEO ERROR REPORTING HAS NOT BEEN REQUESTED THEN ONLY THE 

"TEST FAILED" MESSAGE WILL BE PRINTED. 



INPUTS 



OUTPUTS 



Rl - EXPECTED DATA 

R2 - ACTUAL DATA 

R3 - ADDRESS OF THE MESSAGE TO PRINT 

R4 - LINE NUMBER ON WHICH THE ERROR OCCUREO 

MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE 
" 'MESSAbE' ON LINE 0" 

"EXPECTED ;" *« 

" ACTUAL I " *d 



CALLING SEQUENCE 



INCLUDE THE LABLE '■ER6001" AS THE ERROR ROUTINE 
POINTER PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



SUBORDINATE ROUTINES CALLED : NONE 



167704 



BGNMSG ER6001 



BIT •6IT06, OPTION 
REQ 601 



ER6001! : 

lEXlT THE ROUTINE IF EXTEWEO 
lERROR REPORTING IS NOT REQUESTED. 



I REPORT EXTENDED ERROR INFOMATION 
PRINTB 0EF7801,R3,R4 



PRINTX obFS^Ol.Rl 



PRINTX 0tF5902,hi2 



iPRINT THE MESSAGE WITH THE LINE NUMBER, 

MOV 
MOV 
MOV 
.^V 
MOV 
TRAP 
ADO 

(PRINT THE "EXPECTED" DATA MESSAGE. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

(PRINT VHt ■ACTUAL" DATA MESSAGE. 

MOV 
MOV 
MOV 
MOV 
TRAP 

ADD 



?05B 



R4 , - ( iP ) 

R5,(SP) 

♦EF 7/301. -(SP> 

♦5. -(SP) 

SP.RO 

CIPNTB 

OIC.SP 

Rl, -CSP") 
♦EF5901. -ISP^ 
♦2 . C SP ) 
SP.RO 
CIPNTX 
/>6.SP 

R2. (SP) 
^.F-5902, -(SP^ 
*2, tSP) 
SP.RO 
CtPNTx 
Ot>,SP 



c:^ 



CZOHVBO OHl' II KI.INC TST PART2 
GLOBAL tPROk REPORTING ROUTINE 



MACRO M1200 15 MAR -84 
- ER600X - 



09iaa PAGE 43-1 



SEQ 54 



20i>9 



01^376 



60* 



ENDMSG 



104425 



LIOOO?! 



TRAP 



CJMSG 






SEQ 55 



2065 
20b4 

aobh 

2067 
^06d 
2069 
2070 
2071 
2072 
2075 
2074 
2075 
2076 
2077 
2076 
2079 
2080 
2081 
2082 
2085 
2084 
2085 
2086 
2087 
2088 

2089 

2090 
2091 
2092 
2093 
2094 
2095 
2096 
2097 
2098 
2099 
2100 



2101 
2102 
2105 
2104 



012400 
012400 
012400 
012400 



012404 
012412 



012414 
012416 
012422 
012422 
012424 
012450 
012434 
012456 
012440 
012444 
012446 
012450 
012452 
012452 
012454 
01246C 
012464 
012466 



052767 
001433 



005002 
012703 

010146 
012746 
012746 
010600 
104414 
062706 
000241 
006205 
103011 

010246 
012746 
012746 
010600 
104414 



.SBTTL GLOBAL ERROR REPORflNG flOUTINV - ER6401 - 

THIS IS AN ERROR REP0RTI^4G SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INFORMATION AFTER THC ERROR MESSAGE HEADER. PROVIDED EXTENDED ERROR 
REPORTING HAS BEEN ENAdLEO. 

THIS SUBROUTINE IS PASSED A CPR CONTAINING FLAGS WHICH INDICATE 
THE LINECS) FOR WHICH THE ERROR CONDITION SHOULD BE REPORTED. 



INPUTS: 



Rl - ADDRESS OF THE MESSAGE TO BE PRINTED BY THIS ROUTINE. 
R5 - CONTAINS THE ERROR FLAGS. (1 FLAG PER LINE). 



OUTPUTS: MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 

CALLING SEQUENCE! LOAD THE ADDRESS OF THE MESSAGE IN Rl. 

INCLUDE THE LABEL "ER6401" AS THE MESSAGE POINTFR 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

COMMENTS; THE OUTPUT FORMAT OF THIS MESSAGE IS: 

TEXT MESSAGE 
ONN 
<^NN 

WHERE EACH "<^NN"*is THE NUMBER OF A LINE WITH THE ERROR. 

SUBORDINATE ROUTINES USED: NONE. 



004567 I714t>4 



BGNMSG 
SAVE 



ER6401 



JSR 



ER6401: : 
I SAVE THE CONTENTS OF THE GPRS. 
R5.PREG05 (CALL REGISTER SAVE SUBRT. 



I • 



I EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



000100 167576 



000020 



I ■ 



BIT 
BEQ 



CLR 
MOV 
PRINTS 



«eiT06. OPTION 
60$ 



R2 

*NUMLNS,R5 

^F0503,Rl 



lEXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

(DURING THE SOFTWARE. QUESTIONS. 



(CLEAR LINE NUMBER TO ZERO. 
I SET UP MAX LTNE COUNT. 
iPRINT MESSAGE. 



004156 
000002 



000006 



2$ J 



CLC 
ASR 
BCC 
PRINTB 



R5 
41 

<tf:F6401,R2 



(CLEAR CARr^t . 

iSHlFT FLAG OUT INTO CARRt OH 
iSKiP ERROR REPORT U CLEAR. 
jPRINr MESSAGE. 



004 550 
000002 



MOV Rl. (SP) 

MOV *EF0505. -(SP) 

MOV «2, (SP) 

MOV SP.RO 

TRAP CiPNTB 

ADD 06 , SP 



MOV R2. (SPi 

MOV «t>c40l, tSP^ 

MOV C.\ (^P1 

MOV ^P.RO 

TRAP CJPNTB 



E5 



CZDHVBO DHU-11 f UNC TST PART2 
GLOBAL ERROR REPORTING ROUTINE 



MACRO M1200 15 -MAR -84 09:28 
- ER640I - 



PAGE 44-1 



SEQ 56 



012470 
^105 012474 

2106 012476 

2107 012500 

2108 012502 
012502 

2109 012504 
012504 
012504 



062706 
005202 
020502 
001562 

004 736 



104423 



000006 



4$; INC R2 

CMP R5.R2 

BNE 2$ 
60$: PASS 

ENDMSG 



JSR 



ADO #6.SP 



» INCREMENT LINE COUNT. 

I CHECK IF MAX LINE COUNT EXCEEDED. 

I LOOP IF NOT DONE. 

J RESTORE THE SAVED 

PC.S(SP> 



CONTENTS 



OF THE 
I RETURN TO 



LlOOlO: 



GPRS, 
PREG05 SUBRT 



TRAP 



CJMSG 



CZO.'VBO DHU-U FUNC TST PART2 
GLOBAL ERROR REPORTING ROUTINE 

2115 

2114 
2115 
2116 
2117 
2118 

;ni9 

2120 

2121 



2124 
2125 
2126 
2127 
2128 
2129 
2130 
2151 
2152 
2133 

2134 
2135 
2156 
2137 
2138 
2139 
2140 
2141 
?142 



MACRO M1200 15-MAR-64 09:26 
- ER7tt01 - 



F5 

PAGE 45 



SEQ 57 



.SBTTL GLOBAL ERROR REPORTI^iG ROUTINE - ER7801 - 

* THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS AN ADDITIONAL ERROR 

* MESSAGE WHOSE ADDRESS IS PASSED AS AN INPUT PARAMETER. A LINE NUMBER 

* IS INCLUDED AT THE END Of THE MESSAGE. THE MESSAGE IS PRINTED ONLY IF 

* EXTENDED ERROR REPORTING IS REQUESTED. 

* INPUTS: Rl - ADDRESS OF THE MESSAGE TO PRINT. 

» R3 - NUMBER OF LINE ON WHICH ERROR OCCURRED. 

* 

* OUTPUTS; A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 
* 

LOAD THE ADDRESS OF THE MESSAGE IN Rl. 

LOAD THE LINE NUMBER INTO R3. 

INCLLOE THE LABEL "ER7801" AS THE MESSAGE POINTER 

PARAMETER IN THE OIAG SUPER ERROR REPORT MACRO CALL, 



CALLING SEQUENCE: 



* 
* 
* 
* 

♦ COMMENTS: 

* 



THE MESSAGE IS PRINTED AS BASIC ERROt^ INFORMATION. 



SUBORDINATE ROUTINES USED: NONE. 



2143 
2144 



012506 
012506 



012506 
012514 



012516 
012516 
012520 
012522 
012526 
012532 
012534 
012536 

012542 
012542 
012542 



BGNMSG ER7801 



ER7801:: 



i * 



EXIT IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



032767 
001412 



010346 
010146 
012746 
012746 
010600 
104414 
062706 



104423 



000100 167474 



BIT ^IT06, OPTION 
BEQ 2$ 



(EXIT WITH TEST FAILURE MESSAGE IF 

I NO EXTENDED ERROf^ REPORTING HAS BEEN REQUESTED 

jDURING THE SOFTWARE QUESTIONS. 



PRINTS 0EF7601,Rl,R3 jPRINT THE MESSAGE. 



004417 
000003 



000010 



2$: 



ENDMSG 



MOV 


R5, -CSP) 


MOV 


Rl. "(SP) 


MOV 


*EF7801. 


MOV 


*3. -CSP) 


MOV 


SP.RO 


TRAP 


C$PNTB 


ADO 


010. SP 


LlOOll: 





-CSP) 



TRAP 



CSMSG 



CZDHVBO DHU-11 FUNC TST PART2 
GLOBAL ERROR REPORTING ROUTINE 
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SEQ 58 



2146 

2147 

2148 

2149 

21^0 

215] 

2152 

2155 

2154 

2155 

2156 

2157 

2158 

2159 

2160 

2161 

2162 

2165 

2164 

2165 

2166 

2167 
2168 
2169 
2170 
2171 
2i72 
2175 
2174 
2175 



2176 



2177 



2178 
ai79 



012544 
012544 



012544 
012552 



012554 
012554 
012556 
012562 
012566 
012570 
012572 
012576 
012576 
012600 
012604 
012610 
012612 
012614 
012620 
012620 
012622 
012626 
012632 
012654 
0126i6 

012642 
012642 
012642 



052767 
001433 



010146 
012746 
012746 
010600 
104414 
062706 

0XC446 
012746 
012746 
010600 
104415 
062706 

010246 
012746 
012746 
010600 
104415 
062706 



104423 



.SBTTL GL03AL ERROR REPORTING ROUTINE - ER9001 - 

* THIS IS AN ERROR REPORTING SUBROUTINE WHICH REPORTS AN UNEXPECTED 

* CODE WHICH HAS BEEN FOUND IN THE OUT CSR. THIS CODE CAN BE A BMP 

* CODE. A SELF -TEST CODE. OR A MODEM STATUS CODE. 
* 

* INPUTS: Rl - ADDRESS OF MESSAGE TO PRINT FIRST. 

* R2 - SINGLE BYTE CODE WHICH HAS BEEN READ FROM THE DUT . 

* R4 - LINE NUMBER ASSOCIATED WITH THE CODE. 
* 

* OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

* CALLING SEQUENCE: INCLUDE THE LABEL "ER9001" AS THE MESSAGE POINTER 

* PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

* COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 

* 

* SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER9001 



ER9001: : 



000100 167436 



J EXIT IF EXTENDED ERSOR REPORTING HAS NOT BEEN ENABLED 
1 - 



004455 
000002 



000006 



0O4537 
000002 



000006 



004611 
000002 



000006 



2J: 



BIT 


*eiT06, OPTION 


lEXIT WITH TEST FAILURE MESSAGE 


IF 






6EQ 


2J 


iNO EXTENDED ERROR REPORTING HAS BEEN 


REQUESTED 








jDURING THE SOFTWARE QUESTIONS, 








PRINTS 


0EF9001,R1 


iREPORT TYPE OF CODE FOUND. 


MOV 


Rl.-(SP) 










MOV 


*EF9001, 


(SP) 








MOV 


«2,-(SP) 










MOV 


SP.RO 










TRAP 


CIPNTB 










ADD 


<>6.SP 




PRINTX 


0EF9002,R4 


I REPORT THE LINE NUMBER OF THE 


CODE. 
MOV 


R4 . f SP ) 










MOV 


^F9002. 


■(SP"J 








MOV 


#2.-(SP) 










MOV 


SP.RO 










TRAP 


C»PNTX 










ADO 


*6,SP 




PRINTX 


0EF9003,R2 


jREPORT THE CODE WHICH WAS FOUND. 












MOV 


R2, (SP) 










MOV 


^F9005. 


■i.SP) 








MOV 


«2 . - C SP ) 










MOV 


SP.RO 










TRAP 


CJPNTX 










ADD 


«6 , SP 




ENDM^U 




H0012; 









TRAP 



CiMSG 



i-i r.; 



\b 



CZDHVBO DHUll FUNC TST PART2 
GLOBAL tRROR REPORTING ROUTINE 

2181 

2185 



2165 
2186 
218" 
2188 
2189 
2190 
2191 
2192 
2195 
2194 
2195 
2196 
2197 
2198 
2199 
2200 
2201 
2202 
2205 



MACRO H1200 15-MAR-84 
- ER9002 - 
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SEQ 59 



2204 
2205 
2206 
220? 
2208 
2209 
2210 
2211 
2212 
2215 
2214 



2215 



2216 
2217 
2218 



012644 
012644 



012644 
012652 



012654 
012656 
012662 
012662 
012664 
012666 
012672 
012676 
012700 
012702 
012706 
012706 
012710 
012714 
012720 
012724 
012726 
012730 
012754 
012756 
012740 
012740 
012742 
012746 
012752 



052767 
001462 



006205 
042702 

010346 
010146 
012746 
012746 
010600 
104414 
062706 

010246 
012746 
012746 

012746 
010600 
104415 
062706 
005704 
100414 

010446 
012746 
012/46 
012746 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - eR9002 - 

♦ THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS INTENDED FOR USE IN THE 

• TRANMSISSION AND RECEPTION TESTS. XT REPORTS THE TYPE OF ERROR WHICH 

• HAS OCCURRED WHEN INCORRECT DATA IS RECEIVED FROM THE DUT . THIS 

♦ ROUTINE ALSO RLPORTS THE READ AND EXPECTED DATA VALUES. 
* 

* INPUTS: Rl - ADDRESS OF MESSAGE TO PRINT FIRST. 

♦ R2 - OA^A BYTE READ FROM THE DUT. 

* R5 - LINE NUMBER rtULTIPLIED BY 2. 

♦ R4 - EXPECTED DATA BYTE. BIT 15 SET IF "NONE". 

♦ OUTPUTS; A MESSAGES If. PRINTED AT THE OPERATOR CONSOLE. 

* 

* CALLING SEQUENCE: IUCl.UOE THE LABEL "ER9002' AS THE MESSACF. POINTER 

♦ PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

• COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 

* 

• SUBORDINATE ROUTINES USED: PRTLPR, 



BGNMSG ER9002 



ER9002; ; 



000100 167356 



177400 



I EXIT 
; - 



IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT 
BEQ 



ASR 
Die 
PRINTB 



#eiT06,0PlI0N 
62 J 



lEXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENOeO ERROR REPORTING HAS BEEN REQUESTED 

iDl^RING THE SOFTWARE QUESTIONS. 



R5 

#177400.R2 

0EF9006.R1.R3 



004721 
000005 



000010 



010647 
0O4b40 
000003 



000010 



010625 
004640 
000003 



PRINTX 



<?fcF9004,«EM9010.R2 



TST 
BMI 
PRINTX 



(CALCULATE TH( , INt NUMBER. 

jMASK OUT ALL tiUl DATA IN READ CHAR. 

jPJ^INT THE FIRST LINE OF THE MESSAGE. 

MOV R3.-CSP 

MOV Rl, CSP 

MOV 0EF9006 

MOV #3,-CSP 

MOV SP»R0 

TRAP CIPNTG 

ADD «10,5P 
tPRINT ACTUAL DATA. 

MOV R2.-(SP 

MOV *EM9010 

MOV OEF9004 

MOV *3. -(SP 

MOV SP.RO 

TRAP C$PNTX 

ADD 010. SP 

R4 iCHFCK FOR "NONE" CODE SET IN EXPECTED DATA. 

2» I BRANCH TO PRINT "NONE" MESSAGE IF FLAG SET. 

«EF9004,0EM9O09.R4 iPRINT EXPECTED DATA. 

MOV R4. (SP 

MOV 0tM90C^ 

MOV 5EF9004 

MOV *?, -CSP 



) 
) 
.-CSP) 

) 



. -iSP) 
.-(SP) 

) 



i.SP> 
(.SP) 



C^DHVBO OHU-ll FUNC TSI PART*? 
GLOBAL ERROR REPORTING ROUTINE 



I'll 



MACRO M1200 15-MAR-84 
- ER9002 - 
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SEQ 60 



012756 


010600 










MOV 


SP.RO 


012760 


1044 If) 










TRAP 


C$PNTX 


012762 


062706 


000010 








ADD 


#10, SP 


^^i9 012766 


000412 






BR 


,>0$ 


;KXIT THIS ROUTINE. 




?220 012770 






2$: 


PRINTX 


OEFg005.ftEM9009 


I PRINT MESSAGE INDICATING NO EXPECTED 


DATA. 


012770 


012746 


010625 








MOV 


OtM9009, -CSP) 


012774 


012746 


004670 








MOV 


«Er9005. -CSP) 


013000 


012746 


000002 








MOV 


<^2»-(SP) 


015004 


010600 










MOV 


SP.RO 


015006 


104415 










TRAP 


CJPNTX 


015010 


062 706 


000006 








ADD 


#6.SP 


J221 015014 


004767 


002266 


60$: 


JSR 


PC.PRTLPR 


I PRINT CONTENTS OF THE LPR REGISTER. 




2222 015020 






62$! 


ENDMSG 








015020 












LlOOlSi 




015020 


104423 










TRAP 


CJMSG 



Jb 



CZDHVBO DHU-11 KUNC TST PART,? 
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SEQ 61 



.^^:?4 

22^b 
t,Vc? 7 

?:^?'^ 

2235 
P234 

2236 
223? 
223a 
2230 
2240 
2241 
2242 
2243 
2244 
2245 
2246 



2248 
2249 
2250 



2251 
2252 
2253 
2254 
2255 
225t^ 
2257 



2258 
225<^ 

2260 
2261 



013022 
015022 
013022 
013026 
015032 
013034 
(15054 
015040 
015044 
015050 
013052 
015054 
013060 
015062 
015066 
015070 
0150/2 
015074 
015076 
015076 
015102 
015104 
013110 
015114 
013U6 
015120 
015124 

oi:n26 

015130 
015152 
015134 
013154 
013134 



012700 
C46700 
001040 

012746 
012746 
012746 
010600 
104414 
062706 
005002 
016705 
005004 
000241 
006005 
105015 

016446 
010246 
012/46 
0.2746 
010600 
104415 
062 706 
012405 
005202 
005705 
001356 



104423 



000100 
167156 



010673 
004156 
000002 



000006 
167524 



002614 

004 745 
000005 



000010 



SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9004 - 



THIS IS AN FRROR REPORTING SUeROUTINE. WHICH REPORTS ERROR SUMMARIES 
FOR LINES WHICH HAVE EXCEEDED THE SPECIFIED MAXIMUM NUMBER OF 
INDIVIDUAL RECEPTION ERRORS. PROVIDED EXTENDED ERROR REPORTING HAS 
BEEN REQUESTED BY THE OPERATOR. 



4 

I* 

t* INPUTS: 

;♦ 

i* 

i * 

J* OUTPUTS 
;* 

J* 
1* 

i* 
I* 
;♦ 

;♦ 



Rl - ADDRESS OF MESSAGE TO PRINT FIRST. 

ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE 

ERSKRF - "REPORT ERROR SUMMARY FOR LINE" FLAGS. 

A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



INCLUDE THE LABEL "ER90D4" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL 



COMMENTS: 



THE MESSAGE IS PRINTED AS 
THE CONTENTS OF GPR' S R2. 



BASIC AMD EXTENDED 
R3, R4, AND R5 ARE 



ERROR INFORMATION. 
DESTROYED. 



SUBORDINATE ROUTINES USED: NONE 



BGNMSG ER9004 



MOV 


*6IT06.R0 


eic 


OPTION. RO 


BNE 


6$ 


PRINTS 


#EF0503.<>EM9O14 



^t\ 



CLR 


R2 


MOV 


ERSMRF.R3 


CLR 


R4 


CLC 




ROR 


R5 


BCC 


4i 


PRINTX 


0EF9010,R 



ER9004:i 

J TRY TO CLEAR THE 

(EXT'D ERROR REPORTING FLAG 

(EXIT IF FLAG NOT SET. 

jREPORT THE SECONDARY ERROR MESSAGE. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 

iCLEAR THE LINE COUNTER. 

(GET THE ERROR SUMMARY FLAGS. 

(CLEAR "LINE COUNTER TIMES 2" OFFSET. 

iCLEAR THE CARRY FOR THE FOLLOWING ROTATE. 

jSHIFI ANOTHER ERROR SUMMARY FLAG INTO CARRY. 

iSKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR 



^M9014. -CSP) 
*eF0503, -CSP) 
«2. -(SP) 
SP.RO 
C$PNTB 
<^,SP 



MOV 


ERCNTB(R4\ (SP) 


MOV 


R2, -CSP) 


MOV 


^EF9010. -CSP) 


MOV 


«5. CSP) 


MOV 


SP.RO 


TRAP 


CJPNTX 


f\DD 


«10.SP 



4$: 



6$: 



MOV 


(R4)»,Rb 


INC 


R2 


rsT 


R3 


UNt 


di 


EN0M5G 





ilNCfv'EMENT THE LINE Of r SET F;i 2. 

iINCREMT THF LINE COUNTER. 

i CHECK THE. ERROR iltlMARl FLAGS. 

J IF MURE FLAGi; SET, LOOP TO 00 OTHER LINES. 



L 10014; 



TRAP 



CSMbG 



KL) 



C/DHVBO DHUll F UNC TSV PrtRT:> 
UUODAl. FRROR REPORTING ROUTINE 

2268 

22 70 
22/1 
2272 
2275 
2274 

2276 
2277 
2278 
2279 
2280 
2261 
2282 
2283 

22 -i4 
2285 
2286 
2287 
2288 
2289 

2290 



MACRO M1200 15 -MAR -84 09 .'28 PAGE 49 
- ER9101 - 

.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9101 - 

THIS IS A GENERAL ERROR REPORTING SUBROUTINE WHICH REPORTS A MESSAGE 
WHICH TAKES A 3INGLE, 2 DIGIT DECIMAL ARGUMENT AFTER THE END OF AN 
ASCII MESSAGE. 



SEQ 62 



INPUTS: 



Rl - VALUE TO BE PRINTED AFTER MSG AS 2 DECIMAL DIGITS. 
R2 - ADDRESS OF MESSAGE TO PRINT FIRST. 



OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 
CALLING SEQUENCE: 



COMMENTS: 



INCLUDE THE LABEL '•ER9101" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 



SUBORDINATE ROUTINES USED: NONE. 



013156 
015136 

015136 
013142 
013146 



BGNMSG ER9101 



ER9101:: 



012700 
046700 
001012 



000100 
167042 



MOV 
BIC 
BNE 



*6IT06.R0 
OPTION, RO 
2S 



I TRY TC CLE^R THE 

jEXT'O ERROR REPORTING FLAG 

tEXiT IF FLAG NOT SET . 



2291 
3392 



013150 
013150 
015152 
015154 
013160 
013164 
013166 
013170 

013174 
013174 
013174 



010146 
010246 
012746 
012746 
010600 
104414 
062706 



104423 



PRINTB #EF9006.R2*R1 (REPORT THE STRING FOLLOWED BY THE NUMBER. 



004721 
000003 



000010 



2$: 



ENDMSG 





MOV 


R1,-(SP) 




MOV 


R2. -(SP") 




MOV 


0EF9006, -(SP) 




MOV 


i>3. CjP) 




MOV 


SP.RO 




TRAP 


CJPNTH 




ADO 


tflO.SP 


L 10015: 







TRAP 



CJMSG 



L 



5 



C/DHVBO DHU 11 fUNC TST PARTD 
GLOBAL KRROR REPORTING ROUTINE 

^^9Q 

2300 
2501 
2302 
2303 
2304 
230^ 
2306 
230 7 
2303 
2309 
2310 
2311 
2312 
2313 
2314 
23lf^ 



MACRO M1200 15 MAR-Sfl 09;28 
■ ER9301 - 
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SEQ 63 



2316 

2317 
2318 
2319 
2320 
2321 
2322 



2323 
2324 
2325 
2526 
2527 
2328 
2320 
2330 
2331 
2332 
2333 
2334 
2335 
2336 
2337 
2338 
2339 
2540 
2541 
2542 



013176 
013176 
013176 
013176 

013202 
013206 
013212 

013214 
013214 
013216 
015222 
013226 
015230 
015232 
013256 
015242 
015246 
013250 
013252 
015256 
015260 



004567 170656 



012700 
046700 
001064 



010146 
012746 
012746 
010600 
104414 
062706 
012^03 
012705 
012301 
012504 
004767 
020302 
103772 



013262 
013266 
013270 
0152 74 
013276 
013300 
013302 



020227 
001036 
005762 
001433 
012501 
011304 
012705 



000100 
166776 



004156 
000002 



000006 
002412 
011257 



000056 



002606 
000002 

011507 



.SBTTL GLOBAL ERROR REPORTING ROUTINE - ER9301 - 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ANY BMP CODES 
THAT ARE FOUND IN THE BMP CODE QUEUE, TOGETHER WITH THE THE NUMBER OF 
THE TEST THAT WAS EXECUTING AT THE TIME THE BMP CODE WAS LOGGED. 
PROVIDED EXTcNDED ERROR REPORTING HAS BEEN ENABLED. 



* 
* 

* 
* 

* 
* 
* 



INPUTS: 



OUTPUTS: 



Rl - THE ADDRESS OF THE FIRST MESSAGE TO BE REPORTED. 
R2 - THE ADDRESS OF THE NEXT EMPTY CELL IN THE QUEUE. 

THE TEST NUMBER FOLLOWED BY THE BMP CODE ARE PRINTED AT THE 
OPERATOR CONSOLE. 



CALLING SEQUENCE: 



INCLUDE THE LABEL "ER9301" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



COMMENTS: 



THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 



SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER9301 
SAVE 



JSR 



(SAVE THE GPRS ON THE 
R5.PREG05 J CALL 



ER9301: : 
STACK, 
REGISTER SAVE SUBRT. 



MOV 
BIC 
BNE 



*6IT06.R0 
OPT ION, RO 
60 i 



PRINTS #EF0503,R1 



2$: 



MOV 


<«MPCQB.n3 


hOV 


<>EM9502,R5 


MOV 


CR3)»,R1 


MOV 


(R3)».R4 


JSR 


PC,50J 


CMP 


R3.R2 


BLO 


2$ 



;TRY TO CLEAR THE 

lEXT'D ERROR REPORTING FLAG 

(EXIT IF FLAG NOT SET. 

I REPORT UNEXPECTED BMP CODES FOUND. 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 
OF THE BMP CODE 
REPORTED. 

TEST THAT WAS EXECUTING. 
REPORTED OFF THE QUEUE. 



THE 
THE 
THE 
BMP 



START ADDRESS 
MESSAGE TO BE 
NUMBER OF THE 
CODE THAT WAS 



ifSET 

iGET 

jGET 

jGET 

(GO REPORT THE BMP CODE. 

(CHECK IF ALL COOES HAVE BEEN REPORTED. 

tIF IT IS NOT THE LAST BMP CODE THEN LOOP. 

CHECK IF OVERFLOW HAS OCCURRED, 
rnt CONDITIONS FOR OVERFLOW ARE: THE POINTER CONTAINS THE ADDRESS OF THE 
lASr CELL IN THE QUEUE, AND A BMP CODE HAS ALREADY BEEN WRITTEN INTO THAT 
CELL. 



Rl, CSP") 
0EF0503. -CSP) 
*2, -CSP) 
SP.RO 
CtPNTB 
06. SP 
QUEUE. 



CMP 


R2,deMPCQE-4 


BNE 


601 


TST 


2(R2) 


BEQ 


60 J 


MOV 


(R3)».R1 


MOV 


CR5).R4 


MOV 


ftEM9303,R5 



(CHECK IF THE POINTER IS 
jEXiT IF NOT AT TH^ LAST 
i CHECK FOR A BMP CODE IN 
lEXlT IF NO OVERFLOW HAS 
jGET THE TEST NUMBER OFF 
([;FT THE BMP CODE OFF THE 



AT THE LAST LOCATION 
LOCATION. 
THE LAST CELL 
OCCUREO, CELL EMPT> . 
THE QUEUE. 
QUELfE. 



; SELECT THE MESSAGE TO BE RC;PORTEO. 



CZDHVBO OHU-ll FUNC T5T PART2 
GLOBAL ERROR REPORTING ROUTINE 



??43 



2344 

2546 
2347 



2548 
2349 

2350 
2351 



015506 
013506 
013512 
013516 
013320 
013322 
015326 
015332 

013334 
05.3534 
015536 
015540 
015542 
013546 
013552 
015354 
013356 
015362 
013364 
013364 

013566 
013366 
013366 



012746 
012746 
010600 
104415 
062706 
004767 
000414 



010446 
010146 
010546 
012746 
012746 
010600 
104415 
062706 
Ov')O207 

004736 



104423 



005131 
000001 



000004 
000002 



005053 
000004 



000012 



M5 
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SEQ 64 



PRINTX ftEF9302 



I REPORT 



J5R 
BR 



PC. 50$ 
60$ 



I REPORT 
jEXIT. 



50$: 



PRINTX #EF9301 . R5 . Rl , R4 



60$ I 



RTS 
PASS 



ENOMSe 



PC 



JSR 



;RETURN. 
i RESTORE 
PCaCSP)* 



OVERFLOW CONDITION. 




MOV 


#EF9302.-CSP) 


MOV 


Al, CSP) 


MOV 


SP.RO 


TRAP 


C»PNTX 


ADD 


fl4,SP 


THE LAST BMP CODE PLACED ON THE 


QUEUE . 


THE MESSAGE. 




MOV 


R4,-(SP) 


MOV 


ru, -(?p) 


MOV 


R5. -CSP) 


MOV 


<^EF9301, -CSP) 


MOV 


*4.-C5P) 


MOV 


SP.RO 


TRAP 


C$PNTX 


ADD 


«12,SP 



THE GPR CONTENTS 



;RETL'RN TO PREG05 SU8RT. 



L 10016: 



TRAP 



C$MSG 



N5 



CZDHVBO DHU-11 TUNC IST PART2 
GLOBAL SUBROUTINES SECTION 
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SEQ 65 



^S5S 

?561 
2362 
256? 
2564 
2565 
2566 



.SBTTL GLOBAL SUBROUTINES SECTION 



THc GLOBAL SUBROUTINtS SECTION CONTAINS THE SUBRUUTINES 
THAT ARE USED IN MORE THAN ONE TEST, 
t - 



C/DHVBO OHU-ll FUNC TbT PARTS 
GLOBAL S16R0UTINE 

2St& 
2369 

asyo 

?37S 
237t) 
J!37? 
?57a 
^37^ 
^3S0 
2301 



2385 
2384 
256^ 
2586 
2387 
2588 
2389 
2390 
2391 
2392 
2595 
2394 
2395 
2396 



MACRO M1200 
- ALTFLO - 



15-M/5R.84 09i28 
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SEQ 66 



SBTTL GLOBAL SUeROUTI^€ - ALTFLO 

- ALTER DEVICE REGISTER FIELDS ROUTINE - 
VHIS SUeR0UTI^4£ ALTERS THE SPECIFIED FIELD OF THE SPECIFIED DEVICE 
'REGISTER FOR THE SPECIFIED LINES. THIS ROUTINE CAN BE USED TO SET 
OR CLEAR BITS WITHIN SELECTED FIELDS OF SELECTED REGISTERS. 
JSE EXAMPLESt SET RX. BAUD. RATE FIELDS ON LINES 3 AND 6. 

CLEAR TX.DMA BITS ON ALL LINES. 



INf'UTS: 



OUTPUTS: 



Rl - ADDRESS OF THE REGISTERS TO ALTER. 

R2 - BIT FIELDS SET TO DESIRED STATES. 

R5 - BIT MAP OF LINES fOR WHICH TO ALTER REGISTER. 

R4 - MASK OF BIT? TO ALTER Cl INDICATES CHANGE BIT). 

CSRA - CONTAINS THE ADDRESS OF THE DEVICE CSR. 

lESTAT - SAVED STATES OF THE INTERRUPT ENABLE BITS. 

DEVICE REGISTERS - SPECIFIED REGISTER FIELDS ALTERED. 
CSR IND.ADR.REG FIELD - DESTROYED. 



CALLING SEQUENCE! 
COMMENTS! 



JSR 



PC.ALTFLD 



THIS ROUTINE READS THE SPECIFIED REGISTERS FOR ALL LINES 
WITH NUMBERS LOWER THAN THE HIGHES SPECIFIED LINE. 
THIS ROUTINE DOES NOT READ THE CSR. 



SUBROUTINES CALLED: NONE. 



2397 
2398 
2399 
2400 
2401 
2402 
2405 
2404 
2405 
2406 
2407 
2408 
2409 
2410 
2411 
2412 
2413 
2414 
2415 
2416 
2417 
2418 
2419 
2420 
2421 
242^ 



015370 
013370 



004567 170464 



ALTFLO:: SAVE 



(SAVE CONTENTS Of GPRS RO THRU R5. 
JSR R5,PREG05 iCALL REGISTER SAVE S'JQRT 



015374 
013376 
015400 
013402 



010100 
005100 
040002 
016705 166650 



MOV 


R4.R0 


COM 


RO 


SIC 


R0,R2 


MOV 


IESTAT.R5 



015406 
015410 
015412 
015414 
015420 
015422 
015424 
015426 
0154 50 
015452 
01M34 



000241 
006005 
103006 
010577 
011100 
040400 
050200 
OlOOll 
005205 
005^0 5 
Q01365 



166606 



SET UP TO LOOP FOR EACH LINE: 

PREPARE THE WORD TO BE OREO INTO THE REGISTER CONTENTS. 

SET UP THE WORD TO WRITE INTO THE IND.ADR.REG FIELD OF THE CbR. 

(CALCULATE THE NEW CONTENTS OF THE 

I REGISTER FIELDS WHICH ARE TO BF. 

I ALTERRED BY THIS ROUTINE. 

iSET UP TO WRITE IND.ADR.REG FIELD TO 0. 

LOOP ONCE FOR EACH LINE, ALTERING THE SPECIFIED FIELD IN THE SPECIFIED 

REGISTER IF THE LINE HAS BEEN SELECTED FOR ALTERING. 
EXIT THE LOOP IF NO MORE LINES TO ALTER. OR IF WE HAVE ALTERED THE MAX 

ALLOWABLE NUMBER OF LINES (AS SPECIFIED BY NUMLNS). 

iPREPARE FOR ROTATE. "TST R5" DOES THIS BELOW 
2$: ROR R5 iGET THE LINE SELECT BIT FOR THIS LINE. 

iSKIP SETUP IF UINE IS NOT SELECTED. 

iSET OUT CSR IND.ADR.REG FIELD TO THIS LINE. 

iGET THE PRESENT CONTENTS OF THE REG TO ALTER 

iCLEAR THE BIT FIELDS WE ARE TO ALTER. 

lOR IN THE NEW STATES OF THE FIELDS. 

(WRITE THE. NEW REGISTER CONTENTS TO THt R(->.;. 
4li INC R5 (SET LINE NUMBER TO THE NEXT LINE. 

iCHtCK FQP UNHANOLEO LINES. CLEAR CARR* fl.AU. 

iLQQP IF SELECTED LINE(S) IS NOT HANOLtOs 



CLC 




ROR 


R5 


BCC 


41 


MOV 


R5.BCSRA 


MOV 


(RD.RO 


SIC 


R4,R0 


BIS 


R2.R0 


MOV 


RO.CRl) 


INC 


R5 


TST 


R5 


8NE 


^i 



Cb 

8£8B)(P*^s8ByO»llhl^k"^^ ^'^^ ^^^^^ ^^il^^W^^ IS-MAR fl4 09!c>a PAG?. 52- I StQ 67 

.^."•5 015456 60Jj PASS I RESTORE GPRS. 

015456 004756 JSR PC.8(SP)* iRETURN TO PREG05 SUBRT. 

^A^t 013440 OOO^OV 9TS PC (RETURN TO CAULING ROUTNE, 



6f8B)(f^BgHo6h^f^^ 



TbT PART2 



'^«SiPN'?L^2°° 



15-MAR-84 09:28 
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PAGE 53 



SEQ 66 



.^4r'9 
J4 50 
2451 

243? 

2454 
243? 
24 3b 

24?: 

2438 
2459 
2440 
2441 
24ii2 
244 3 
2444 
244? 
2446 
244 7 
2446 
2449 
2450 
2451 
2452 
2453 

2454 
2455 
2456 
2457 
2458 
2459 
2460 
2461 
2462 
24o3 
2464 
2465 
2466 
2467 
2468 
2469 
2470 
2471 
2472 
2475 
2474 
2475 
24 76 
24 77 
24 78 
24 79 
2480 
2481 
2482 
24di 



SBTTL GLOBAL SUBROUTINe 



- ASLNTL 



013442 

015442 004567 170412 

015446 126727 166550 

013454 001411 



015456 005005 

013460 010565 003750 

015464 005205 

015466 005205 

013470 02052 7 000040 

015474 002771 

013476 000411 



013500 012701 004050 

015504 012702 005750 

015510 112122 

013512 105022 

013514 020227 004010 

013520 002773 



015522 012701 003750 

015526 012702 004010 

015532 012105 

015554 006205 

015536 110522 

Ol3b40 02012? QQ4010 



- SETUP ASSOCIATED LINE NUMBER TABLES ROUTINE - 
THIS ROUTINE SETS UP THE TWO TABLES WHICH ARE CONTAIN INFORMATION 
ABOUT THE TX/RX LINE WHICH IS ASSOCIATED WITH A PARTICULAR RX/TX 
LINE. ONE TABLE IS A TABLE Of* WORDS WHICH CONTAINS WORD OFFSET 
VALUES AND THE OTHER TABLE IS A TABLE OF BYTES WHICH CONTAINS 
LINE NUMBER VALUES. 

INPUTS; LOPBCK - STORAGE FOR THE TYPE OF LOOPBACK ON THF OUT. 

NUMLNS - EQUATED TO THE NUMBER OF LINES ON THE OUT. 

STGTRB - LABEL AT BASE OF STAGGERED LINE ASSOCIATION TBL . 

TXRLNB - LABEL AT BASE OF BYTE TX/RX LINE NUMBER TABLE. 

TXRXLB - LABEL AT BASE OF WORD TX/RX LINE NUMBER TABLE. 

TXRXLE - LABEL AT END OF WORD TX/RX LINE NUMBER TABLE. 

OUTPUTS: TXRXL, TXRLN - TABLES INITIALIZED FOR SELECTED LOOPBACK. 

CALLING SEQUENCE: JSR PC, ASLNTL 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: NONE. 



ASLNTL:: SAVE 

000002 CMPB 

BEQ 



JSR 
LOPBCK, 02 
4$ 



iSAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 (CALL REGISTER SAVE SUBRT. 
I TEST FOR STAGGERED LOOPBACK. 
iGO SET UP STAGGERED TAFJLE IF STAGGERED LPBCK 



I SET UP THE WORD TABLE FOR NON-STAGGERED LOOPBACK. 
i - 

2$: 



CLR R5 

MOV R5.TXRXLB(R5) 

INC R5 

INC R5 

CMP R5.02*NUMLNS 

BLT 2t 

BR Si 



(CLEAR THE LINE COUNTER 

I SET UP A WORD OF THE TABLE. 

(SET LINE COUNTER TO NEXT LINE OFFSET. 
(TEST FOR ALL LINES DONE. 
iLOOP i^TIL ALL LINEG DONE » 
tGO SET UP THE BYTE TABLE. 



I ► 



I SET UP THE WORD TABLE FOR STAGGERED LOOPBACK. 



41: 
6«: 



MOV OSTGTRB.Rl 

MOV 0TXRXLB,R2 

MOVB (Rl)*.(R2). 

CLRB (R2J* 

CMP R2.0TXRXLE 

BLT 6» 



; SET UP THE BYTE TABLE BASED 

8t: MOV OTXRXLB.Rl 

MOV *TXRLNB,R2 

10$j MOV (Rl).,R5 

ASR R5 
MOVB R5.CR2)' 

CMP Rl.^TXRXLL 



I SET UP THE SOURCE POINTER. 

(SET UP THE DESTINATION POINTER. 

(MOVE A BYTE INTO THE TABLE, 

iCLEAR THE UPPER BYTE OF WORD TABLE ENTRY. 

(COMPARE POINTER WITH END ADR OF TABLE. 

(LOOP IF NOT AT END YET. 

ON THE WORD ASSOCIATION TABLE. 

(SET UP THE SOURCE POINTER. 

(SET UP THE DESTINATION POINTER. 

(GET THE WORD OFFSET VALUE FROM WORD TABLE. 

(OIvrOE BY 2 TO GET LINE NUMBER VALUE. 

(LOAD THE BYTE LINE NUMQER INTO TABLE. 

(COMPARE SOLfRCE POINTER WITH ADR OF TABLE ENt") 



CZDHVBO DHU 11 F UNC TST PART2 
GLOBAL SL©ROUTINE 



.^4^4 013544 
2485 

2^S6 013546 

013546 

2487 015550 



002772 



004 736 
000^07 



MACRO MiaoO 
- ASLNTL ■ 



60* 
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SEQ 69 



BLT 

PASS 

RTS 



iOi 



PC 



JSR 



iLOOP IK NOT Ar END QF TABLE YET. 

J RETURN TO PRtGOS SUBRT. 



iRESTORE GPRS. 
PC.Q(SP)* 



Kb 



C/DHVBO DHU U TUNC TST PART2 
GLOBAL Sl.>eROUTINE 



^489 
2490 
2491 
0492 
2493 
2494 
2495 
2496 
2497 

2498 
2499 
2500 
2501 
2502 
2503 
2504 
2505 
2506 
2507 
2508 
2509 
2510 
2511 
2512 
2513 
2514 
2515 
2516 
2517 



MACRO ni200 
- CALMSL - 
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SEQ 70 



SBTTL GLOBAL SUBROUTINE 



- CALMSL 



- CALIBRATE MILLI SECOND LOOP COUNT SUBROUTINE - 
THIS SUBROUflNE CALIBRATES THE TIMING LOOP WHICH IS USED IN THE MSLOOP 
ROUTINE. THIS SUBROUTINE CALCULATES A VALUE FOR THE MSLCNT VARIABLE 
WHICH IS THt NUMBER OF SOFTWARE LOOPS WHICH TAKES 1 MS TO EXECUTE IN 
THE MSLOOP ROUTINE. THIS ROUTINE CALIBRATES THE COUNT BY USING THE 
LINE TIME CLOCK (LTC). SO IF NO LTC IS AVAILABLE THE DEFAULT VALUE FOR 
THE DELAY COUNT MUST BE USED. 



INPUTS: 



OUTPUTS; 



MSLCNT - OEFAUI.T i MS DELAY LOOP COUNT VALUE. OR 

VALUE FROM PREVIOUS CALIBRATION. 
MSTICK - NUMOER OF MS PER LTC CLOCK TICK. 

TIMERl - TIMER COUNTER CHANGED BY LTC INTERRUPT SERVICE RTN. 
CLKHRZ - NUMBER OF LTC CLICKS PER SECOND (50 OR 60). 

CARRY - SET IF LTC IS AVAILABLE, AND NEW CALIBRATION PERFORMED 
MSLCNT - NEW 1 MS DELAY LOOP COUNT VALUE IF LTC AVAILABLE. OR 
UNCHANGED IF NO LTC IS AVAILABLE. 



CALLING SEQUENCE: 
COMMENTS: 



J5R 



PC. CALMSL 



SUBORDINATE ROUTINES CALLED: UtMSDIV.OOPS . 



2518 
2519 
2520 
2521 
2522 
2523 
2524 
2525 
2526 
2527 
2528 
2529 
2550 
2531 
2532 
2533 
2534 
2535 
2536 
2537 
2538 
2539 
2540 
2541 
2542 
2543 
2544 



013552 
013552 
013556 



004567 
005067 



170302 
000210 



JSR 



CALMSL:: SAVE 

CLR 62 » 
I SYNCHRONIZE WITH THE LTC. 



(SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 iCALL REGISTER SAVE SlCRT 
I CLEAR THE 2ND TIME FLAG. 



013562 012705 000001 



013566 
013570 
013576 
013602 
013604 
015606 
013610 
013612 



013614 
013620 
013622 



005000 
012767 
005767 
001410 
005200 
001373 
005305 
003371 



005067 
000241 
000461 



000001 
166512 



166516 



2$: 



4$! 



MOV 



CLR 
MOV 
TST 
BEQ 
INC 
BNE 
DEC 
BGT 



01. R5 



tSET OUTER LOOP COUNTER TO 1 LOOP. 
I INCREASE THE VALUE LOADED INTO THIS COUNTER IF THE <•* 
iFOLLOWiNG LOOP FAILS ON FUTURE. FASTER PROCESSORS. <♦♦ 

RO I CLEAR THE WAIT FQR CLOCK INT COUNTER. 

01. TIMERl iSET UP COUNT OF 1 TO SYNCH WITH LTC. 

TIMERl (CHECK FOR COUNTER HAVING GONE TO ZERO. 

6$ jJUMP OUT OF LOOP IF LTC HAS INTERRUPTED. 

RO (COUNT THIS ITERATION OF THE INNER LOOP, 

4i I LOOP IF COUNTER HAS NOT TURNED OVER. 

R5 I DECREMENT THE INNER LOOP COUNTER. 

4i (LOOP IF OUTER LOOP COUNT NOT UP. 



166472 



I IF WE GOT NO LTC INTERRUPT, INDICATE THAT THERE IS NO LTC AVAILABLE. 
I LTC MUST BE FLAKEY, OR NOT REALLY AN LTC AT ALL. 

CLR CLKHRZ jCLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 

CLC (INDICATE FAILURE FOR RETURN. 

BR 60$ jBYPASS THE FOLLOWING CALIBRATION PROCEDURES. 



013624 012704 002314 



I 

; 

6% 



WE ARE 

SET UP 



NOW 
FOR 

MOV 



SYNCHRONIZED WITH THE LTC 
THE CALIBRATION LOOP. 



0TIMER1.R4 



(WILL TEST TIHERl IN THE LOOP BELOW. 



CZDHVBO OHU-11 


rUNC TST 


PART2 


GLOBAL SlieROUTINE 




2543 013650 


005001 




2546 013652 


005002 




2547 015654 


005005 




2548 013636 


012714 


000001 


2549 






2550 015642 


016705 


166460 


2551 013646 


011400 




2552 015650 


010067 


000120 


2553 013654 


040200 




2554 013656 


020005 




2555 015660 


000261 




2556 015662 


001406 




2557 013664 


005305 




2558 015666 


001567 




2559 015670 


005301 




2560 015672 


001565 




2561 013674 


004767 


001160 


2562 






2563 






2564 






2565 






2566 






2567 






2568 013700 


005401 




2569 0137C2 


016702 


166420 


2570 013706 


010203 




2571 013710 


160502 




2572 015712 


010204 




2573 013714 


005005 




2574 013716 


005301 




2575 013720 


100403 




2576 015722 


060304 




2577 015724 


005505 




2578 015726 


000773 




2579 






2580 






2581 






2582 013730 


016701 


166370 


2583 015734 


010403 




2584 015/56 


010502 




2585 013740 


004767 


003556 


2586 013744 


103402 




2587 013746 


004767 


001106 


2588 013752 


010167 


166550 


2589 015756 


005167 


000010 


2590 013762 


001277 




2591 013764 


000261 




2592 






2593 015 766 






013766 


004 736 




2594 015770 


000207 




2595 






2596 015772 


000000 




2597 0X3774 


000000 





G6 
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SEQ 71 





CLR 


Rl 




CLH 


R2 




CLR 


R5 




MOV 


01.CR4') 


8J: 


MOV 


MSLCNT,R5 


10$: 


MOV 


(R4),R0 




MOV 


R0.64$ 




SIC 


R2,R0 




CMP 


R0,R3 




SEC 






BEQ 


12$ 




DEC 


R5 




BNE 


10$ 




DEC 


Rl 




BNE 


81 




JSR 


PC, OOPS 



I CLEAR THE OUTER LOOP COUNTER. 
(INDICATE TO CHECK ALL BITS OF TIMER!. 
(INDICATE TO CHECK TOR TIMERl CLEAR. 
(LOAD TIMERl WITH COUNT OF 1. 

(LOAD MS LOOP COUNT. 

iGET THE TIMERl VALUE. 

I SAVE WORD (LIKE IN THE REAL LOOP). 

(LEAVE ALL THE BITS. 

(COMPARE AGAINST ZERO. 

(SET CARRY IN CASE OF" SUCCESS. 

(EXIT LOOP IF TIMERl HAS CLEARED. 

(COUNT DOWN THE INSIDE MS LOOP COUNT. 

(LOOP IF MS NOT UP. 

(DECREMENT THE MS TIME COUNT. 

(KEEP LOOPING. 

I WE OVERFLOWED, SOMETHING IS WRONG, ABORT. 

t WE HAVE NOW HAVE LOOP COUNT INFORMATION FOR ONE CLOCK TICK. 

( WE HAVE NEGATIVE OF NUMBER OF OUTER LOOPS IN Rl, EACH IS MSLCNT INNER LOOPS. 

; WE HAVE THE PORTION OF THE LAST OUTER LOOP NOT EXECUTED. IN R5. 

; NOW WE CALCULATE THE TOTAL NUMBER OF INNER LOOPS EXECUTED. 

GET NUMBER OF OUTER LOOPS. 

GET THE NUMBER OF INNER LOOPS PER OUTER LOOP. 

COPY NUMBER OF LOOPS FOR MULTIPLY. 

CALC # OF INNER LOOPS DONE IN LAST OUTER LOOP 

AND ADD TO ACCUMULATOR LSWORD. 
CLEAR ACCU^tA.ATOR MS WORD . 
CHECK Rl FOR CONDITION 

SKIP MULTIPLICATION IF ZERO 
MULTIPLY NUMBER OF INNER 

LOOPS PER OUTER LOOP BY 
NUMBER OF OUTER LOOPS PERFORMED. 



(# OF MS PER LTC TICK IS DIVISOR. 

(LSWORD OF LOOP COUNT 15 LSUORD DF DIVIDEND. 

(MSWOi^O OF LOOP COUNT IS MSWORD OF DIVIDEND. 

(DIVIDE NUMBER OF LOOPS BY MS PER LTC TICK. 

(BYPASS OOPS IF WE'RE OK. 

(CLOCK ROUTINES ARE NOT LONG ENOUGH. OR BiG. 

(SET NEW VALUE FOR MS LOOP COUNT. 

(SET THE 2N0 ITERATION FLAGS IF 1ST ITERATION 

iBf^ANCH IF ONLY ONE ITERATION DONE. 

(SET THE SUCCESS FLAG FOR EXIT. 



; - 






12$: 


NEG 


Rl 




MOV 


MSLCNT, RS 




MOV 


R2.R5 




SUB 


R5.R2 




MOV 


R2,R4 




CLR 


R5 


14$: 


DEC 


Rl 




BMI 


16$ 




ADD 


R5,R4 




ADC 


R5 




BR 


14$ 


! DIVIDE THE TOTAL NUMBER 


16$: 


MOV 


MSTICK.Rl 




MOV 


R4,R5 




MOV 


R5,R2 




JSR 


PC.UNSDIV 




BCS 


18$ 




JSR 


PC. OOPS 


18$: 


MOV 


R I, MSLCNT 




COM 


62$ 




BNE 


2$ 




SEC 




60$; 


PASS 


1 




RTS 


vJ 

PC 


62$: 


.UOHO 





64$: 


.WORD 






iREStor: ".prs. 

PC.SCSPU 

( CAVRY - SUCCESS 



(RETURN TO PRtG05 SUBRT 
FLAG. SET IF SUCCESS. 



(2N0 C/UIBRATION ITERATION FLAGS. 

i DUMMY WORD FOR STORAGE OF THE READ WORD. 



C/DHVBO DHU II FUNC TST PARTS 
GLOBAL SLJBROUTINE 



^599 

2600 
?.bOl 

^60^ 

2603 
2604 
260? 
2606 
2607 
2608 
2609 
2610 
2611 
2612 
2613 
2614 
2615 
2616 
2617 
2616 
2619 



2620 
2621 
2622 
2623 
2624 
2625 
2626 
2627 
2628 
2629 



2630 
2631 
2632 



013776 
013776 
014002 
014006 
014010 
014012 
014016 
014022 
014030 
014032 
014034 
014036 
014036 
014042 



004567 
012700 
040200 
001011 
004767 
012701 
012767 
000261 
000401 
000241 

010166 
004 736 



MACRO M1200 
- CHKBMP - 

.SB 

• ♦* 

;* 

;• 

;* 

J* 

t* 

i* 

;♦ 

1* 

!♦ 
i* 
I* 
i* 
I* 
I* 

;* 
I - - 



170056 
170301 



002462 
006401 
012020 



000004 



-\6 
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TTL GLOBAL SUBROUTINE - CHKBMP - 

- CHECK IF CHARACTER IS A BMP CODE - 

THIS SUBROUTINE IS USED TO CHECK FOR BMP COOES. 

IF A BMP CODE IS DETECTED. IT WILL BE SAVED ON THE QUEUE TO BE REPORTED 
LATER. THE CARRY IS USED AS A FLAG TO INDICATE A CODE HAS BEEN FOUND, 



SEQ 72 



INPUTS: R2 - CONTAINS THE DATA TO BE CHECKED. 

OUTPUTS: Rl - CONTIANS THE MESSAGE TO BE REPORTED. 

ERRBLK - CONTAINS THE ERROR REPORTING ROUTINE. 

CARRY BIT IS USED TO INDICATE A BMP CODE FOUND. CARRY SET. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC . CHKBMP 



SUBORDINATE ROUTINES CALLED: SAVBMP . 



014044 000207 



CHKBMP;: SAVE 

MOV 

BIC 

BNE 

JSR 

MOV 

170026 MOV 

SEC 
BR 
2J: CX 
60$: PASS 



RTS 



JSR 
*170301,R0 
R2,R0 
21 

PC » SAVBMP 
^M5303,R1 
*ER 1603, ERRBLK 



60$ 
Rl 



PC 



MOV 
JSR 



;SAVE CONTENTS OF GPRS RO THRU R5. 

R5,PREG05 jCALL REGISTER SAVE SUBRT. 

I SET UP THE FLAGS Of A BMP CODE. 

(TRY TO CLEAR THE BMP CODE FLAGS. 

iIF NOT A BMP CODE. EXIT WITH FAILURE. 

(SAVE THE BMP CODE ON THE QUEUE. 

jPASS THE MESSAGE TO BE REPORTED. 

;SELECT IHE CORRECT ERROR REPORTING ROUTINE. 

(PASS FLAG TO INDICATE SUCCESS. BMP CODE FOUND. 

lEXlT. 

(PASS FLAG TO INDICATE FAILURE. 

(RESTORE GPRS, EXCEPT 

Rl.RlSLOT'SP) jPUT Rl IN STACK SLOT. 

PC,S(SP)* (RETURN TO Pl.t.ri05 SUBRT. 

iRl - CONTAINS THE ADDRESS OF ERROR MLSSAGE. 

(CARRY BIT - SET INDICATES SUCCESS. 



CZDHV80 DHO U KUNC 
GLOBAL SUBROUTINE 

3634 
2655 
3636 
3637 
2638 
2639 
2640 
2641 
2642 
2643 
2644 
2645 



264 7 
2648 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2656 
2659 
2660 



TST PAR 12 



MACRO M1200 
- CKRXTM - 



16 

15-MAR-84 09:28 PAGE 56 



SEQ 73 



2661 
2662 
2663 
2664 
2665 
2666 
2667 
2668 
2669 
2670 
2671 
2672 
2673 
2674 
2675 
2676 
2677 
2678 
2679 
2680 
2681 
2682 
2683 
2684 
2685 
2686 
268/ 
2688 
2689 



.SBTTL GLOBAL SUBROUTINE - CKRXTM - 

- CHECK RX-INT DELAY TIME - 
THIS SUBROUTINE IS USED IN THC RXTIHER TEST AND IT CHECKS THAT THE 
RX-INT WAS DELAYED BY ♦/- 20«< OF THE VALUE SET IN THE RXTIMER REG. 
IF THE ACTUAL DELAY TIME IS NOT WITHIN iHIS MARGIN THEN AN ERROR 
IS REPORTED. 



INPUTS: 



OUTPUTS I 



Rl - REMAINING NUMBER OF MILLI SECS OF THfc TIME -OUT VALUE 

THE TIME-OUT VALUE BEING 4*CRXTIMER VALUE ♦ 1). 
R2 - RXTIMER VALUE. 

ERRNBR - SET TO ERROR NUMBER OF FIRST ERROR IN THIS ROUTINE. 
ERRBLK - SET UP BY THIS ROUTINE. 
EXOERR - "EXIT ON ERROR" FLAG. 

ERRBLK - MAY BE ALTERED. 

EXOERR - "EXIT ON ERROR" FLAG SET IF AN LR ■ 9 DETECTED AND 
EXTENDED ERROR REPORTING NOT REGJI'.STED. 



CALLING SEQUENCE: JSR PC. CKRXTM 

COMMENTS: THIS ROUTINE REPORTS ONE ERROR WITH Tt.'£ NUMBER IN ERRNBR. 

SL^JRDINATE ROUTINES USED: ER5901 .UNSDIV. 



014046 

014046 004567 170006 

014052 010204 

014054 005204 

014056 006304 

014060 006304 

014062 160104 



014064 012701 000005 

014070 010203 

014072 005002 

014074 004767 003202 

014100 010502 

014102 010305 

014104 160103 

014106 060105 

014110 062705 000002 



014114 020504 

014116 002402 

0:4120 020304 

014122 002417 



CKRXTM J ! SAVE 



J ♦ 



MOV 


R2.R4 


INC 


R4 


ASL 


R4 


ASL 


R4 


SUB 


R1,R4 


ATE 20»< 


OF THE RX 


MOV 


05, Rl 


MOV 


R2.R5 


CLR 


R2 


JSR 


PC.L^SISDIV 


MOV 


R3.R2 


MOV 


R5.R5 


S'JB 


R1,H3 


ADO 


R1,R5 


ADO 


<>2.R5 



JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 
iCOPY THfc RXTIMER VALUE. 
jCALCULATE THE TIME-OUT VALUE. 
i AS 4*(RXTIMER VALUE*1) 

iCALCULATE THE NUMBER OF MS THE RX-INT WAS DELAYED. 



iPASS THE DIVISOR TO THE SU6R . 

iLOAD THE RXTIMER VALUE INTO THE LSW OF THE DIVIDEND. 

I CLEAR THE MSW OF THE DIVIDEND. 

iDIVIDE THE RXTIMER VALUE BY 5. 

iRESTORE THE RXTIMER VALUE. 

iCOPY THE RXTIMER VALUE, 

iREDUCE IT BY 20* TO OBTAIN THE LOLIMIT OF THE 

^PERMISSIBLE TIME DELAY. 

(INCREASE THE RXTIMER VALUE BY 20* AND ADO A 

(FURTHER 2 MS TO OBTAIN THE HILIMIT OF THE 

(PERMISSIBLE TIME DELAY. 

I CHECK IF THE RX-INT OCCURED WITHIN THE CALCULATED PERMISSIBLE LIMITS. 

CMP R5.R4 (COMPARE HiLIM WITH ACTUAL RX-INT OELA^ . 

BLT 21 (REPORT THE ERROR IF THE DELAY WAS TOO 1 0H(' , 

CMP R3.R4 (COMPARE LOL IM WITH ACTUAL RX INT OELA^ . 

BLT 60$ (AVOID ERROR IF DELAY WAS WITHIN THE UMlTs. 



I 



REPORT THE ERROR, INCORRECT DELA> ON RX-INT. 



CZOHVBO OHUll FUNC TST PART2 
GLOBAL Sl^ROUTINE 



2690 
2691 
2692 
2693 
2694 
2695 
2696 

2697 
2698 
2699 

2700 
2701 

2V02 



014124 
014126 
014130 



014154 
014142 
014142 

014144 

0141S2 
0141'j4 
014162 
014162 
014164 



010201 
010402 
012703 007003 



MACRO M1200 
- CKRXTM - 

2*1 



15-MAR-84 09:28 



J6 
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012767 012170 167714 

104460 

032767 000100 166036 

001003 

012767 000001 166070 

004736 
000207 



60$ 



MOV 
MOV 
MOV 



MOV 
ERROR 



BIT 
BNE 

MOV 
PASS 

RTS 



R2.R1 
R4.R2 
<>EM5802,R3 



0ER5901,ERRBLI< 



*BIT06. OPTION 

60$ 

fll.EXOERR 



PC 



J5R 



SEQ 74 



tPASS THE EXPECTED VALUE OF THE RX-INT DELAY. 

(PASS THE ACTUAL VALUE OF THE RX-INT DELAY. 

(PASS THE MESSAGE. 

I "RXTIMER BAD, INCORRECT MILLI SEC DELAY ON 

I RX-INT". 

tSET UP THE ERROR REPORTING ROUTINE. 



TRAP 



CtERROR 



iHAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
jAVOID SETTING THE FLAG IF IT HAS. 
iSET THE "EXIT ON ERROR" FLAG. 



PC.SCSP)* 

I RETURN FROM SUBROUTINE. 



;RETURN TO PREG05 SUBRT 



C/DHVHO DHU-U F UNC TbT PART2 
GLOBAL bL>8R0UTIN£ 

.^704 
2 70S 



I? 708 
2709 
*?710 
.■^711 

2715 
2714 
271S 
2/16 
2717 



MACRO liiaoo 

- CKTRAP - 



Kb 
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SEQ 75 



.SBTTL GLOBAL SUBROUTINE - CKTRAP - 

:» CHECK TRAP ROUTINE ^ 

1* THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME-OUT TRAP (004 TRAP) 

♦ WHICH IS CAUSED BY AN ACCESS TO A NON-EXISTENT MEMORY OR I/O LOCATION. 

* IF THE TRAP DOES NOT OCCUR, THIS ROUTINE RETURNS A SUCCESS INDICATION. 
f 

RO - SOURCE ADDRESS FOR MOVE. 

Rl DESTINATION ADDRESS FOR MOVE. 

CRO) - SOURCE FOR THE MOVE. 



271>^ 
2720 
2721 
2722 
272S 
2724 
2725 
2726 
2727 

2729 
2729 
2750 
2731 
2 732 
2733 
2734 

2735 



• INPUTS: 
* 

♦ OUTPUTS: 

J* CALLING SEQUENCE: 



(Rl) - WRITTEN TO THE CONTENTS OK (RO). 

CARRY FLAG - SET ON RETURN IF NO 004 TRAP DETECTED. 

TP4FLG - NONZERO IF TRAP OCCURRED, CLEARED OTHERWISE. 



JSR 



PC. CKTRAP 



014166 
014166 
014172 
014176 
014200 
014204 
014206 
014210 
014212 
014212 
014214 



004567 167666 

005067 166102 

011011 

005767 166074 

000261 

001401 

000241 

004 736 
000207 



i* 

;* COMMENTS: IF THIS SUBROUTINE CAUSES A TRAP, EITHER THE ADDRESS WHICH 
I* IS LABELED ADRPTR WILL BE THE TRAP PC ADDRESS ON THE STACK. 

;* SUBORDINATE ROUTINES CALLED: NONE. 

jSAVE CONTENTS OF GPRS RO THRU R5. 

R5,PflEG05 jCALL REGISTER SAVE SUBRT. 

t CLEAR THE 004 TRAP FLAGS. 

(PERFORM THE MOVE IN QUESTION. 

I CHECK FOR OCCURENCE OF TRAP. 

i INDICATE SUCCESS. 

jEXIT WITH SUCCESS IF TRAP DID NOT OCCUR. 

;INOICATE FAILURE. 

tRESTORE GPRS. 

PC,a(SP)f ;RETURN TO PREG05 SUBRT 



CKTRAP:: SAVE 






JSR 


CLR 


TP4FLG 


MOV 


(RO).(Rl) 


ADRPTRt; TST 


TP4FLG 


SEC 




BEQ 


60 J 


CLC 




60$: PASS 





RTS 



PC 



JSR 



C^DHVBO DHU-11 KUNC TST PARl^ 
GLOBAL SUBROUTINE 

2757 
^738 

2740 
2741 
2742 
2743 
2744 
2745 
2746 
2747 
2748 
2749 
2750 
2751 
2752 
2755 
2754 
2755 
2756 
2757 
2758 
2759 
2760 
2761 
2762 
2763 
2764 
2765 



MACRO M1200 
• CLNRST - 
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SEQ 76 



2766 
2767 

2766 
2769 
27 70 
2771 
2772 
2773 
2774 
2775 
2776 
2/7 7 
2778 

2//9 
2780 



014216 
014216 



014222 
014226 



004567 167636 



004 767 
103002 



002054 



014230 004767 001X"J4 



014234 
014234 
014234 



004 736 



.SBTTL GLOBAL SUBROUTINE - CLNRST - 



- CLEAN RESET Or THE DEVICE UNDER TEST 
THIS SUBROUTINE IS USED TO RESET THE OUT TO A KNOWN STATE. 
THE DUT'S SELF-lcST IS SKIPPED. AND THE riFQ IS PURGED Or ANY ERROR 
CIDES, ETC. 

II THE RESET DOES NOT SUCCESFiJll^Y COMPLETE. THEN THE CARRY BIT IS 
PASSED BACK TO THE CALLING ROUTINE (CLEAR). # 



;♦ 
t» 
I* 
I* 

!* 

J* 
i» 

i* INPUTS i 

;♦ 

;* 

I* 

i* 

i* OUTPUTS: 

:♦ 

;* 

!♦ 

i* 
• * 

;♦ CALLING SEQUENCE: 

1* 

(♦ COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS ERRNBR. 
t» THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 

* 

♦ SUBORDINATE ROUTINES CALLED: DELAY .MSLGET .PUFIFO.RESETT . 



CSRA - CONTAINS THE ADDRESS OF THE CSR 

TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 

ERRNBR - ERROR NUMBER FOR POSSIBLE ERROR REPORT. 

ERRTBL- ERRTYP.ERNBR.AND ERRMSG SET UP CORRECTLY. 

THE OUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 

CARRY - CLEAR INDICATES THE TEST IS TO BE ABORTED. 

ERRBLK - VALUE MAY BE DESTROYED, 

lESTAT - TX AND RX INTERRUPT FLAGS ARE CLEARED, 

TX AND RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 



JSR 



PC. CLNRST 



JSR 



iSAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 I CALL REGISTER SAVE SUORT. 



CLNRST: : SAVE 

( * 

J RESET THE OUT. 

( THIS ROUTINE REPORTS ERRORS WITH NUMBERS FROM ERRNBR THRU ERRN8R*2 



JSR 

BCC 



PC.RESETT 
60$ 



jRESET THE DUT TO A KNOWN STATE. 

iEXIT ROUTINE WITH ABORT TEST INOICATUR. 



PURGE THE FIFO OF ERRO^? CODES, SAVE ANY BMP CODES FOUND. 



1 " 



605 t 



014236 C0020? 



JSR 

PASS 

RTS 



PC.PUFIFO 



JSR 



PC 



, PURGE THE FIFO. 

jEXir THE TEST USING RESETT OR PUFIFO STATUS. 
;RESTOnE GPRS, PASS THE FOLLOWING INTACT: 
PC.SCSP)* jRETuRN TO PRfcG05 SUBRT 

iCARRY BIiaF CLEAR. THEN ABORT THE TEST. 
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SEQ 77 



2782 
2785 
2 784 
2V85 
2786 
2787 
2788 
2789 
2790 
2791 
2792 
279? 
2794 
2795 
2 796 
2797 
2798 

2799 
2800 
2801 
2802 
2803 



014240 

014240 004567 167614 

014244 012701 000020 

014250 005020 

014252 005501 

014254 ooirrs 

014256 

014256 004 756 



.SBTTL GLOBAL SUBROUTINE - CLR16W - 

)♦ - CLEAR SIXTEEN WORDS ROUTINE - 

J* THIS SUBROUTINE CLEARS 16 WORDS STARTING WITH THE SPECIFIED WORD. 

J* 

[* INPUTS; RO - ADDRESS OF THE FIRST WORD TO CLEAR. 

• *• 

;♦ OUTPUTSt (RO) TO CR0*15) - 16 WORDS OF MEMORY ARE CLEARED TO 0. 

J* 

I* CALLING SEQUENCE: JSR PC,CLR16W 

J* 

!* COMMENTS: 

i* 

;* SUBORDINATE ROUTINES CALLED: NONE. 

;SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PREG05 jCALL REGISTER SAVE SUBRT . 

tSET THE LOOP COUNTER TO 16. 

: CLEAR A WORD OF MEMORY. 

i COUNT THIS LOOP. 

I LOOP IF NOT 16 WORD CLEARED. 

iREST[''iE GPRS 
JSR PC.SKSP)* * J RETURN TO PREG05 SUBRT 



CLR16W:! SAVE 




MOV 


*16. ,R1 


2*: CLR 


(RO)* 


DEC 


Rl 


BNE 


2$ 


60$: PASS 





2804 014260 000207 



RTS 



PC 



N6 
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2806 
2807 
2808 
2809 
2810 
2811 
2812 
2815 
2814 
2815 
2816 
2817 
2818 
2819 
2820 
2821 
2822 
2823 
2824 



MACRO H1200 
■ DELAY - 
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SEQ 78 



2825 
2826 
2827 
2828 
2829 
2830 
2631 
2832 

2833 
2834 
2835 



014262 
014262 
014266 
014270 
014274 
014276 
014302 
014306 
014310 
014 314 
014314 
014316 



004567 
010401 
012702 
005003 
012704 
004 767 
103002 
004767 

004736 

000207 



167572 

177777 

014320 
000536 

000544 



.SBTTL GLOBAL SUBROUTINE - DELAY - 

i* - DELAY SUBROUTINE - 

:♦ THIS SUBROUTINE IS USED TO DELAY A VARIABLE NUMBER OF MILLI -SECONDS. 

I* INPUTS: R4 - CONTAINS THE NUMBER OF MS TO DELAY. 
I* MSLCNT. 

1* OUTPUTS: NONE. 

;♦ 

J* CALLING SEQUENCE: JSR PC. DELAY 

i* 

1* COMMcNTS: IF NO HARDWARE CLOCK INTERRUPTS ARE OCCURING, CONTROL-CS WILL 
;* NOT BE HONORED FOR THE DURATION OF THE DELAY. 

I* 

:* SUBORDINATE ROUTINES CALLED: NONE. 



DELAY:: SAVE 



014320 17/777 



60$ 



62$ 





JSR 


MOV 


R4.R1 


MOV 


«-l.R2 


CLR 


R3 


MOV 


<^62i.R4 


JSR 


PC.MSLOOP 


BCC 


60* 


JSR 


PC, OOPS 


PASS 


ICD 


RTS 


Jon 

PC 


.WORD 


-1 



I SAVE CONTENTS OF GPRS RO THRU M5. 

R5,PRE.G05 jCALL REGISTER SAVE SU6RT. 

iPASS NUMBER OF MS DELAY AS TIME-OUT VALUE. 

J TELL MSLOOP ROUTINE TO CHECK ALL BITS. 

I TELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR. 

iTELL MSLOOP TO CHECK DUMMY NON-ZERO WORD. 

1 DELAY THE REQUESTED fl OF MS. 

iEXIT ROUTINE IF UE TIMED -OUT.] 

I IF NO TIME-OUT, BAD PROGRAM OR HOST MACHINE. 

;RESTORE GPRS. 

PC.fil(SP)* : RETURN TO PREG05 SUBRT 



i DUMMY, N0N-/ER0 WORD. 



E3/ 
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^e4r 

2844 
284^ 
2846 



w^848 
2849 
28?0 
2851 
2852 
2855 
2854 
.?855 
2856 
285 7 
2858 
2859 
2860 
2861 
2862 
2863 
2864 
2865 
2866 
2667 



MACRO M1200 
. DMABUF- ^ 
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SEQ 79 



.SBTTL GLOBAL SUBROUTINE 



OMABUF 



- DMA FROM AODR BUTBAS - 
THIS SUBROUTINE INITIATES A DMA FROM THE ADDRESS BUFBAS AND WAITS 
FOR IT TO COMPLETE AND THE LAST CHARACTER TO BE RECIEVEO. THE LINE 
ON WHICH TO PERFORM THE DMA AND THE NUMBER OF CHARACTERS TO TRANSMIT 
ARE PASSED AS INPUT PARAMETERS. 



INPUTS i 



OUTPUTS: 



Rl - LINE NUMBER ON WHICH TO PERFORM THE DMA. 
R5 - NUMBER OF CHARACTERS TO TRANSMIT. 
CSRA - CONTAINS THE ADDRESS OF THE CSR. 
ERRN6R - CONTAINS THE ERROR NUMBER OF TH£ FIRST ERROR 
IN THIS SUBROUTINE. 

CARRY • SUCCESS FLAG - SET IF DMA COMPLEATED SUCCESFULlt. 

CLEAR IF DMA-START BIT FQUNO SET OR 
NO TX -ACT ION RECIEVEO. 
ERRNBR - CONTENTS ALTERED TO INITIAL ERRN6R * 1. 



CALLING SEQUENCE: 



JSR 



PC. OMABUF 



COMMENTS: THIS ROUTINE RETURNS CARRY CLEAR IF AN ERROR OCCURED. WITH 
THE APPROPRIATE ERROR NUMBER IN ERRNBR. A NON-RELATEO TEST 
ERROR SHOULD BE REPORTED. UPON RETURN TO THE TEST, IF THE CARRY 
FLAG IS CLEAR. THIS ROUTINE REPORTS ERRORS, 
INITIAL ERRNBR THRU INITIAL ERRNBR * 1. 

SUBORDINATE ROUTINES CALLED: DELAY .DOOMA.WAIBIS . 



2868 
<f669 
28 70 
2871 
2872 
28 73 
28 74 
28 75 
2876 
28 7 7 
28 78 
28 79 
2880 
2881 
2882 
2833 

2854 



014522 
014522 
014 526 
014532 
014536 



014540 
014344 
014550 
014554 
014560 
014562 
014 566 
014572 
014574 
014574 
01A57& 



J04567 
012702 
004 767 
103016 



005267 
012701 
016702 
004767 
1050O5 
012/04 
004767 
000261 

004 7 56 

000207 



167552 
002650 
000042 



DMABUF J t SAVE 





JSR 


MOV 


♦eUFBAS.Ra 


JSR 


PC , DODMA 


BCC 


601 



R5.PREG05 iCALL REGISTER SAVE SUBRT. 

iPASS THE START ADOR OF THE BUFFER TO TX. 
(INITIATE THE DMA. 
iRETURN WITH FAILURE IF OMA START BIT FOt>IO 



Sf T 



i • 



I WAIT FOR THE 
I FOR THE LAST 



DMA TO COMPLEATE I.E A TX-ACTION BEING RETURNtO. AND THEN WAIT 
CHARACTER TO BE RECIEVEO. 



167506 
1 70536 
165652 
003056 

OOOOO-i 
177670 



1 



60Jt 



INC 
MOV 
MOV 

JSR 

BCC 
MOV 

JSR 
SEC 

PASS 

RTS 



ERRNBR 
♦170556, Rl 
CSRA,R2 

PC.WAIBIS 
60 1 
«5,R4 
PC, DEL AY 



(SET THE ERROR NUMBER TO INITIAL ERRNBR • 1. 

(INDICATE TO TEST BIT15 WITH T IME OUT OF 350 

iPASS THE AOOR OF THE REG TO TEST. 

(WAIT FOR THE TXACTION. 

(RETURN WITH FAILURE I^" NO TX -ACTION FOUND. 

(SET THE DELAY OF 5 MS. 

(WAIT FOR THE LAST CHARACTER TO BE RECIEVEO. 

(SET THE CARRY FLAG TO INDICATE SUCCESS. 



MS 



PC 



JSR 



PC.a(SP)^ 
iRETURN. 



iRETURN TO PREG05 SUURT, 



6t8B)(r.aeh'oihr'^ 



TST PART? 



MA 



mR^2°° 
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SEQ ao 



c-^88 7 
.*?e88 

^8^*1 

0895 
28*>4 
5895 
.:?896 
^89 7 
2898 
c?899 
c?900 
?901 

2903 
2904 
2905 
2906 
2907 
2908 
2909 
2910 
2911 
2912 
2913 
2914 
2915 
2916 

2917 
2918 
2919 
2920 
2921 
2922 
2923 
2924 
2925 
2926 
2927 
2928 



2929 



2950 
2931 
2932 

295J 
2954 
2955 
2956 



014400 
014400 
014404 



014410 
014410 
014412 
014414 
014414 
014420 
014422 
014426 
014432 
014436 
014440 
014442 
01^446 
01^452 



.SBTTL GLOBAL SUBROUTINE - OODMA - 

- INITIATE DMA TRANSMISSION ROUTINE - 
THIS ROUTINE WRITES THE DMA PARAMETER TO THE SPECIFIED DEVICE AND 
INITIATES THE DMA TRANSMISSION. 



INPUTS: 



OUTPUTS: 



Rl - LINE NUr«ER ON WHICH TO INITIATE THE DMA. 

R2 - START ADDRESS OF THE DMA BUFFER (16 BIT VIRTUAL). 

R3 - CHARACTER COUNT OF THE DMA BUFFER. 

CSRA • CONTAINS ADDRESS OF THE DUT CSR. 

lESTAT - STORAGE FOR STATES QT THE INTERRUPT ENABLE BITS. 

TXADIA - CONTAINS ADDRESS OF DMA TX BUFFER ADDRESS REG Ol. 

TXAD2A - CONTAINS ADDRESS OF DMA TX BUFFER ADDRESS REG 02, 

TXBFCA - CONTAINS ADDRESS OF DMA CHARACTER COUNT REGISTER. 

CARRY - SUCCESS FLAG (SET IF DMA START FOUND CLEAR). 
DUT TBUFFADl - LS 16 BITS OF DMA BUFFER ADDRESS C INITIAL leED ) 
DUT TBUFFAD2 - MS 6 BITS OF DMA BUFFER ADDRESS (INITIALIZED). 

DMA START BIT SET. 

DUT TBUFFCT - DMA BUFFER CHARACTER COUNT (INITIALIZED). 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC.DOOMA 



THIS ROUTINE ASSUMES MEMORY MANAGEMENT IS DISABLED AND 
CLEARS THE TUO MSB OF THE DMA ADDRESS. I*E. BITS ANO 1 
OF THE T6UFFA02 REG. 



SUBORDINATE ROUTINES CALLED: NONE. 



00456 7 

012704 



167454 
000200 



DODMA: : SAVE 
MOV 



0200, R4 



I SAVE CONTENTS OF GPRS RO THRU 35. 
JSR R5.PREG05 tCALL REGISTER SAVE Sl^RT. 

iPREPARE TO CLEAR UPPER 6 BITS OF DMA BUFF ADR. 



WRITE THE DMA PARAMETERS OUT TO THE DUT DMA REGISTERS. 
DISABLE INTtRRUPTS. 
SET UP DUT CSR INO.AtW.REG FIELD. 
WRITE THE DMA TRANSMIT CHARACTER COUNT. 

WRITE THE LEAST 'SIGNIFICANT 16 dITS OF THE DMA BUFFER START ADORtSS. 
WRITE THE MOST SIGNIFICANT 6 BITS OF THE ADDRESS. 

SETTING THE DMA START BIT. AND INITIATING THE DMA TRANSMISSION. 



104440 
010005 

012700 
104441 
056701 
010177 
105777 
000241 
100411 
010577 
010277 
UQ477 



6t: 



000 34C 

165650 
165574 
165604 



165576 
165566 
1655^4 



GETPRI R5 



SETPRI flPRIO? 



BIS 

MOV 
T " a 

(' ^- 

MOV 

Move 



lESTAT.rtl 
Rl.WCSRA 

XACTrA 



i3t 



R5.STXBFCA 
R2.STXA01A 
R4t&iTXA02A 



jGET THE PRESENT PROCESSOR PHIOftlTI. 

TRAP CtGPRI 

MOV R0.R5 

iDISABLE ALL HARDWARE INTERRUPTS. 

MOV *PRIO/,RO 

TRAP CtSPRI 

iPREPARE FOR SETUP QF LINE NUMBER IN DUT CSR. 

iSET (.*> THE OUT CSR INO.AOR.REG FIELD. 

I TEST THE DUT DMA START BIT. 

I INDICATE FAILURE IN CASE DMA. HO BIT IS SET. 

lEXIT WITH FAILURE IF DMA. HO BIT IS SET. 

(WRITE THE DMA CHARACTER COUNT. 

iWRITt THE US 16 BITS OF BLffER AQDRESS. 

iWRXTt MS ^ BIT5 OF ADR ANO START DMA TX. 



D/ 

SfflXP^BgyoAh^P^ '^' ""^^'^ "WmK^'^^^ 15-MAH.a4 09:P8 PAGE e?-i SEQ 81 

^958 014456 SBTPRI R5 iRESTORE THE PROCESSOR PRIORITY. 

014456 010500 MOV R5,R0 

014460 104441 TRAP C$SPRI 

^939 014462 000261 SEC » INDICATE SUCCESS. 

2940 

2941 014464 60$: PASS iRESTORE GPRS. 

014464 004736 JSR PC»S(SP)* (RETURN TO PREGC5 SUBRT, 

^^A^ 014466 000207 RTS PC i CARRY - SUCCESS FLAG (SET IF SUCCESS). 



E7 



g^ggXrsggl^oitifir 



ST PART2 



MACno M1200 

- FINACT - 
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SEQ 82 



2944 
2945 
2946 
2947 
2948 
2949 
2950 
2951 
2952 
2953 
2954 
2955 
2956 
2957 
2958 
2959 
2960 
2961 
2962 
2963 

2964 
2965 
2966 

2967 
2968 
2969 
2970 
2971 
2972 
2973 
2974 
2975 
297C 
2977 
2978 
2979 
2980 
2981 



2982 
2983 
2984 



014470 
014470 



014474 
014476 
014502 
014506 
014512 
014514 
014516 
014520 
014522 
014524 
014526 
014530 
014532 

014534 
014534 
014540 
014544 



005001 
012703 
C16700 
012705 
030500 
001006 
00€305 
005201 
02J103 
002772 
000241 
000401 
000261 



010166 
010566 
004736 



.5BTTL GLOBAL SUeROUTINE - FINACT - 

- flHO FIRST ACTIVE LINE - 
THIS SUBROUTINE CALCULATES THE NUMBER OF THE FIRST ACTIVE LINE THAT 
IS FOUND IN THE ACTIVE LINE BIT MAP ACTLN5. 



INPUTS: 



OUTPUTS: 



ACTLNS - CONTAINS THE ACTIVE LINE BIT MAP. 

Rl - CONTAINS THE NUMBER OF THE FIRST ACTIVE LINE. 

R5 - CONTAINS THE BIT MAP REPRESENTATION OF THE ACTIVE LINE. 

CARRY SET INDICATES SUCCESS. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, FINACT 



SUBORDINATE ROUTINES CALLED: NONE. 



004567 167364 



FINACT: : SAVE 



JSR 



000020 
165512 
000001 



2$ 



000004 
000014 



4$: 
60J; 



t FIND AN 


ACTIVE LINE 


CLR 


Rl 


MOV 


*NUMLNS,R3 


MOV 


ACTLNS, RO 


MOV 


«1.R5 


BIT 


R5,R0 


BNE 


4$ 


ASL 


R5 


INC 


Rl 


CMP 


Rl,R3 


BLT 


2« 


CLC 




BR 


60 J 


SEC 




PASS 


R1.R5 




MOV 




MOV 




JSR 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 (CALL REGISTER SAVE SU6RT. 



(CLEAR THE LINE NUMBER COUNTER. 

iGET MAX LINE NUMBER. 

(GET THE ACTIVE LINE BIT MAP. 

(SET UP A LINE BIT MASK. 

(LOOK FOR AN ACTIVE LIh«. 

(BRANCH TO BEGIN TEST IF A LINE HAS BEEN FOUfOO. 

(SHIFT THE BIT MASK FOR THE NEXT LINE. 

(INCREMENT THE LINE NUMBER COUNTER, 

(CHECK IF ALL LINES HAVE BEEN TRIED. 

(LOOP TO TRY THE NEXT LINE. 

(CLEAR CARRY BIT. NO ACTIVE LINE FOUND, 

(EXIT WITH FAILURE. 

(SET CARRY. SUCCESS. 

(RESTORE GPRS, EXCEPT 



Ml.RlSLOTCSP) 

R5.R5SL0TCSP) 

PC,S(SP)» 

(Rl - CONTAINS 

(R5 - CONTAINS 



THE 
THE 



(PUT HI IN STACK SLOT. 

(PUT R5 IN STACK SLOT. 

(RETURN TO PREG05 SUBRT 
NUMBER OF FIRST ACTIVE LINE, 
BIT MAP OF THE ACTIVE LINE. 



2985 014546 000207 



RTS 



PC 



(CARRY - SET INDICATES SUCCESS. 



F7 
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2987 
2988 
2989 
2990 
2991 
2992 
2995 
2994 
2995 
2996 
2997 
2998 
2999 
3000 
3001 
3002 
3003 
3004 
3005 
3006 
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- INDATP - 

.SBTTL GLOBAL SUBROUTINE - INDATP - 

J* - INITIALISE DATA PATTERN - 

i* THIS SUBROUTINE IS USED TO INITIALISE AN INCREMENTAL BYTE DATA PATTERN 

t* IN THE GENERAL BUFFER AREA. 

;♦ THE DATA PATTERN WILL BE SEQUENTIAL FROM TO 255 (DECIMAL). 

I * 

I* INPUTS: BUFBAS - ADDRESS OF THE START OF THE GENERAL BUFFER AREA. 
I* BUFMID - ADDRESS OF THE 255 TH LOCATION. 

; * 

!♦ OUTPUTS: THE FIRST 255 LOCATIONS OF THE GENERAL BUFFER AREA CONTAIN DATA 

I *" 

I* CALLING SEQUENCE: JSR PC.INIDATP 

t * 

i* COMMENTS: 

I* SUBORDINATE ROUTINES CALLED: NONE. 



3007 
3008 
3009 
3010 
3011 
3012 
3013 
3014 
3015 

3016 



014550 
014550 

014554 
014560 
014562 
014564 
014566 
014572 

014574 
014574 
014576 



004567 167504 

012702 002650 

005003 

110322 

005203 

020227 003250 

103773 



004736 
000207 



INDATP:: SAVE 



2$: 



60$ s 



MOV 
CLR 
MOVB 
INC 
CMP 
BLO 

PASS 

RTS 



JSR 

#BUFBAS,R2 

R3 

R?,(R2)* 

R3 

R2,0eUFMID 

2% 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 J CALL REGISTER SAVE SUBRT. 

I INITIALIZE THE DATA PATTERN IN THE GENERAL 
J DATA BUFFER TO A 256 BYTE PATTERN. 

(SELECT THE NEXT CHARACTER. 

J CHECK IF WE HAVE 256 DATA PATTERNS. 



PC 



JSR 



;REST0RE GPRS. 
PC.aCSP)f 



SEQ bZ 



iRETURN TO PREG05 SUBRT 



g^8gxrse^h'o6h^^ 



NC rST PART2 MA 



3016 
3019 
3020 
30?1 
3022 
302? 
3024 
302S 
3026 
3027 
3023 
3029 
3030 
3031 
3032 
30i3 
3034 
3035 
3036 
3037 
3038 
3059 

3040 
3041 
3042 
3043 
3044 
3045 
3046 
3047 
3048 
3049 
3050 
3051 
3052 
5053 
3054 
3055 
3056 
305 7 
3058 



014600 
014600 



014604 
014610 
014612 
014614 
014616 
01462;? 
014624 
014626 
014632 
014634 
014636 
014642 

014644 
014644 
014646 



004567 167254 



012702 
005003 
110322 
105203 
122703 
001001 
105203 
122703 
001001 
105203 
020227 
103763 



004 736 
000207 



002650 

000021 
000023 
003250 



W° 
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SEQ 84 



.SBTTL GLOBAL SUOROUTINE - INOTPX ■ 



;♦ 
i* 
t* 
I* 
I* 

t" 
J* 

* 

(♦ 
I* 

»* 
i* 
;♦ 
I* 



- INITIALISE DATA PATTERN WITHOUT XON OR XOFF 
THIS SUBROUTINE IS USED TO INITIALISE AN INCREMENTAL BYTE DATA PATTERN 
IN THE GENERAL BUFFER AREA. 
THE DATA PATTERN WILL BE FROM TO 255. BUT WLL EXCLUDE THE FOLLOWING 



TWO CHARACTERSi (ASCII DCl, 
LAST TWO DATA CHARACTERS TO 



INPUTS: 



OUTPUT'S 



BUFBAS - ADDRESS OF 
BUFMID - ADDRESS OF 



DC3) XON AND XOFF . THIS 
BE THE SAME AS THE FIRST 

THE START OF THE GENERAL 
THE 255 TH LOCATION. 



WILL 
TWO. 



CAUSE THE 



SUFFER AREA. 



THE FIRST 255 LOCATIONS OF THE GENERAL BUFFER AREA CONTAIN DATA 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC.INDTPX 



SUBORDINATE ROUTINES CALLED: NONE. 



INOTPX:: SAVE 



I * 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 (CALL REGISTER SAVE SUBRT 



INITIALIZE THE 256 BYTE DATA PATTERN. 
I ENSURE THE DATA PATTERN IS FREE FROM XON' S OR XOFF'S TO PREVENT ERRORS. 
t NOTE: THE FIRST TWO CHARACTERS AND THE LAST TWO CHARACTERS WILL BE THE SAME 

INITIALIZE THE DATA PATTERN IN THE GENERAL 
I DATA BUFFER TO A 256 BYTE PATTERN. 

I SELECT THE NEXT CHARACTER. 

I CHECK FOR AN XON CHARACTER. 

i BRANCH IF CHAR NOT AN XON. 

jFORCE THE NEXT CHARACTER. 

(CHECK FOR AN XOFF CHARACTER. 

J BRANCH IF NOT AN XOFF CHARACTER. 

(FORCE THE NEXT CHARACTER. 

(CHECK IF WE HAVE 256 DATA PATTERNS. 





MOV 


BUFBAS, R2 




clR 


R3 


2$: 


MOVB 


R3,(R2)* 




INCB 


R3 




CMPB 


021. R3 




BNE 


4$ 




INCB 


R3 


4$: 


CMPB 


023, R3 




BNE 


6( 




INCB 


R3 


6$: 


CMP 


R2.0BUFMID 




BLO 


2$ 


60$ i 


PASS 


IK 




rts 


Jo 
PC 



(RESTORE GPRS 
PC,a(SP)» 



(RETURN TO PREG05 Sl.*RT 



H7 
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SEQ 85 



3061 
3062 
3065 
3064 
3065 
3066 
3067 
3068 
3069 
3070 
3071 
3072 
3073 
3074 
3075 
3076 
3077 
3076 
3079 
3060 
3081 
3082 
3083 
3084 
3085 

3086 
3087 
3088 
3089 



3090 



014650 
014650 
014654 
014660 
014662 
014666 
014666 
014672 
014674 



SBTTL GLOBAL SUBROUTINE - LihBIT - 

- LINE NUMBER TO BIT MAP CONVERSION SUBROUTINE - 
THIS SUBROUTINE IS USED TO GENERATE A BIT MAP (ONE BIT Or 16 SET) 
BASED ON A LINE NUMBER (RANGE: 1 TO 16). ONLY THE LS 4 BITS OF THE 
LINE NU^fflER WORD ARE USED. THE OTHERS ARE MASKED OUT (SO UNMASKED 
MSBYTES or OUT CSRS CAN BE PASSED TO THIS ROUTINE UITHOUT ERROR). 

INPUTS: Rl - LINE NUMBER (ONLY LS 4 BITS USED, OTHERS DISREGARDED). 
BITTBL - BASE LABEL OF A 16 WORD BIT TABLE. 

OUTPUTS: RO - BIT MAP, BIT CORRESPONDING TO LINE NUMBER IS SET: 

IF LINE NUMBER IS 3, THEN BIT3 IS SET, ETC. 



CALLING SEQUENCE: 



JSR 



PC. LINBIT 



COMMENTS; NO CHECKING IS PERFORMED TO VERIFY THAT THE LINE NUMBER IS 
A LEGAL LINE NUMBER FOR THE OUT ( IC - LESS THAN NUMLNS). 
NOTE: THE LINE NUMBER IS NOT DESTROYED OF ALTERED, SO THIS 
ROUTINE CAN BE USED EASILY IN LOOPS. 

SUBORDINATE ROUTINES CALLED: NONE. 

t ■ - ****«4***4*4i«****4i***4**A«**4i** ***************************** t*****^**^**^^** 



004567 167204 

042701 177760 
006301 

016100 002336 

010066 000002 
004 736 
000207 



LII^IT: : SAVE 



60J: 





JSR 


BIC 


0177760. Rl 


ASL 


Rl 


MOV 


BITTBL(R1).R0 


PASS 


RO 




MOV 




JSR 


RTS 


PC 



I SAVE CONTENTS Of bPRS RO THRU R5. 
R5,PREG05 iCALL REGISTER SAVE SUBRT. 
iMASK OUT ALL BUT 4 LSBITS OF THE LINE *. 
iMULTIPLY LINE « BY 2 TO GET WORD TABLE OFFSET. 
jGET THE SINGLE BIT BIT MAP. 
iRESrORL GPRS, EXCEPT THE FOLLOWING. 
RO,ROSLOT(SP) jPUT RO IN STACK SLOT. 

PC.aCSP)* (RETURN TO PREG05 SUBRT. 

tRO ■ BIT MAP WITH LINE P BIT SET. 



17 
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GLOBAL SLI6R0UTINE 



5092 






3095 






3094 






3095 






3096 






309 7 






3090 






3099 






3100 






3101 






3102 






3103 






3104 






3105 






3106 






3107 






3108 


014676 






014676 


004567 


3109 


014702 


010201 


3110 


014704 


001405 


3111 






3112 


014706 


005002 


3113 


014710 


000261 


3114 






3115 


014712 


005502 


3116 


014714 


006301 


3117 


014716 


001375 


3116 






3119 


014720 






014720 


010266 




014724 


004 736 


3120 


014726 


000207 
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- MAPCNT - 

SBTTL GLOBAL SUBROUTINE - MAPCNT - 

♦ - COUNT BITS IN BIT MAP ROUTINE - 

♦ THIS SUBROUTINE COUNTS THE NLflBER OF BITS WHICH ARE SET IN A BIT MAP. 

♦ INPUTS: R2 - THE BIT MAP FOR JHICH TO COUNT THE BITS. 

♦ OUTPUTS: R2 - COUN " OF THE NUMBER OF BITS THAT WERE SET. 

♦ CALLING SEQUENCE! vJ3R PC. MAPCNT 
* 

♦ COMMENTS: 

♦ SUBORDINATE ROUTINES CALLED: NONE. 



167156 



000006 



MAPCNT: j SAVE 



25: 



60 J 



MOV 
BEQ 


R2,R1 
60* 


CLR 
SEC 


R2 


ADC 
ASL 
BNE 


R2 
Rl 
2* 


PASS 


R2 


MTS 


PC 



(SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PREG05 iCALL REGISTER SAVE SUBRT. 

lEXIT WITH ZERO IF NO BITS ARE SET IN MAP. 

» CLEAR THE BIT COUNT. 

I COUNT THE LAST BIT TO BE SHIFTED OUT. 

(COUNT THE BIT IF IT WAS SET. 

jSHIFT ANOTHER BIT OUT OF THE MAP. 

jLOOP IF ALL BITS NOT SHIFTED OUT OF MAP. 

jRESTORE GPRS, EXCEPT THE FOLLOWING: 
MOV R2.R2SL0TCSP) jPUT R2 IN STACK SLOT. 

JSR PC.aCSP)* jRETURN TO PREG05 SUBRT 

» R2 - COUNT OF BITS SET IN BIT MAP. 



SEQ 86 



C/DHVHO DHU 11 TUNC T5T PARTS 
GLOBAL SlJBROUTINt 



312^ 

31P3 
31J?4 
3125 
3126 
31?7 

31^9 
3130 
3131 
3132 
3133 
3134 
3135 
3156 
3137 
3158 
3139 
3140 
3141 
3142 
3145 
3144 
3145 
3146 
3147 
3148 
3149 
3150 
3151 
3»52 
3153 
3154 
3155 
3156 
3157 
3158 
3159 
3160 
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SEQ 87 



SBTTL GLOBAL SUBROUTINE - MSLGF.T - 

- MILLI SECONDS LOOP MHICH RETURNS READ WORD AND REMAINING TIME - 

THIS SUBROUTINt IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. IT IS USED 

TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOD. THE 

CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 

DESIRED CONDITION AND THE TIME-OUT VALUE IN MILLI -SECONDS. 

THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 

ROUTINE AND THEN ONCE EACH MILLI -SECOND THERE AFTER. 

UPON RETURN, THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION 

IS RETURNED BY THIS SUBROUTINE. 



INPUTS: 



OUTPUTS 



Rl - TIME-OUT VALUE IN MILLI -SECONDS (UP TO 64K MS). 

R2 - BIT MAP OF BITS TO TEST (1 INDICATES TO TEST THE BIT). 

R3 - DESIRED STATES Of THE INDICATED FIELDS IN R2 . 

R4 - ADDRESS OF THE WORD TO TEST. 

MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 

RO - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION, 

Rl - REMAINING NUMBER OF MS IN TIME-OUT TIME. 

CARRY - SUCCESS FLAG CSET IF CONDITION IS MET BEFORE TIME-OUT) 



CALLING SEQUENCE: 



JSR 



PC.MSLGET 



COMMENTS; 



THIS ROUTINE WORKS WITH OR WITHOUT A HARDU'\RE CLOCK. BUT THE 

CALIBRATION IS ONLY GUARENTEEO WHEN A LINC CLOCK IS AVAILABLE 

ON THE SYSTEM. 

THIS ROUTINE CAN BE USED AS A DELAY ROUTINt, BY SPECIFYING THE 

DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 

LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 

IF A TIME-OUT VALUE OF IS SPECIFIED, THIS ROUTINE CHECKS FOR 

THE DESIRED CONDITION BEFORE RET^iRNING. IT INDICATES SUCCESS 

IF THE CONDITION IS MET, FAILURE OTHERWISE. 



SUBORDINATE ROUTINES CALLED: NONE. 



3161 
3162 
3163 
3164 
3165 
3166 
3167 
3160 
3169 
3170 
3171 
31?:- 
31 .'3 
3174 
3175 
31/6 
3177 



014730 

014 /30 004567 167124 



014 734 005102 
014 736 040203 



014740 005701 

014742 001011 

014 744 011400 

014 746 01006 7 0000 70 

014 752 040200 

014 754 020003 

014/56 000r?6l 

0X4V60 001420 



JSR 



tSAVt CONTENTS OF GPRS RO THRU R5 . 
R5,PREG05 I CALL REGISTER SAVE SL6RT. 



MSLGET: : SAVE 

J S^T UP MASK FOR REMOVING UNUSED BITS IN THE TEST WORD, AND CLEAR UNUSED 
; BITS IN THE DESIRED STATE WORD TO ALLOW DIRECT COMPARISON. 

COM R2 iGET MASK Cf UNUSED BITS. 

BIC R2.R5 {MASK OUT UNUSED BITS IN DESIRED STATE WORD. 

I HANDLE THE TEST AND EXIT IF WE HAVE A TIME-OUT VALUE. 

iTEST T-tE TIME-OUT VALUE FOR ZERO. 

iIF NON ^ERO TIME-OUT, GO LOOP AND TfST. 

iGET THE WORD TO TEST BEFORE EXITING. 

iSAVt VALUE SO WE CAN RETURN IT. 

(MASK (JUT UNTESTED BUS OF WORD. 

iCOMPAUE AGAINST DESIRED STATE WORD. 

I INDICATE SICCESS IN CASl WORO^ ARF H3UAU . 

jEXIT WITH SUCCESS IF WORDS ARE EQUAL, 



TST 


Rl 


ONE 


21 


MOV 


(R4).H0 


MOV 


RO.^r^J 


BIC 


R2.R0 


CMP 


R0.R5 


SLC 




BEQ 


6$ 



8L^8^XrsP^&M/Nr 



C TST PART^ 



7>U& 
31 7S 
5180 
3181 
3182 
3185 
3184 
5185 
3186 
3187 
3188 
3189 
3190 
3191 
319^ 
319? 
3194 
3195 
3196 
3197 
3198 
3199 
3200 



3201 
3202 
3203 
3204 
3205 
3206 
3207 
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;eq 88 



014 762 000241 
014764 000416 



014766 016705 165334 

014772 011400 

014 774 010067 000042 

015000 040200 

015002 020003 

Ol50(>i 000261 

015006 001405 

015010 005305 

015012 001367 

015014 005301 

015016 001363 

015020 000241 



C15022 016700 000014 

015026 

015026 010066 OOOOO:^ 

015032 010166 000004 

015036 004736 



015040 000207 



015042 000000 



CLC 
BR 



6* 



tINDICATE FAILURE CTIMfc-OUT). 

lE/tIT WITH FAILURE, WORDS AREN'T EQUAL 



NON-ZERO TIME-OUT VAi.UE. LOOP, WAITING FOR CONDITION OR TIHE-OUT. 



i 

2J 
4$ 



MOV 
MOV 
MOV 
BIC 
CMc> 
SEC 
BEQ 
DEC 
BNE 
DEC 
BNE 
CLC 



MSLCNT.R5 

(R4).R0 

R0.62t 

R2,R0 

R0.R3 

6$ 
R5 
4$ 

Rl 
2$ 



(LOAD MS LOOP COUNT. 

jGET THE WORD TO TEST, 

(SAVE WORD IN CASE THIS IS THE LAST. 

(MASK OUT UNTESTED BITS OF WORD. 

I COMPARE AGAINST DESIRED STATE WORD. 

:SET CARRY IN CASE OF SUCCESS. 

lEXIT WITH SUCCESS IF WORDS ARE EQUAL. 

J COUNT DOWN THE INSIDE MS LOOP COUNT. 

I LOOP IF MS NOT UP. 

jDECREMENT THE MS TIME COUNT. 

:IF TIME NOT UP. LOOP TO COUNT ANOTHER 

.^LEAP CARRY, WE TIMED-OUT. 



MS 



; HAVE EITHER FOUND CONDITION. OR TIMED-OUT (POSSIBLY FROM TIME OUT VALUE) 
1 RESTORE THE LAST CONTENTS READ FROM THE TEST WORD. EXIT ROUTINE. 



6$: 
605 



MOV 
PAS! 



62*. RO 
RO.Rl 



MOV 
MOV 
JSR 



:PASS OUT THE LAST READ WORD. 
;RESTOflE GPRS. EXCEPT THE FOLLOWING: 



RTS PC 
LOCAL STORAGE. 



RO.ROSLOTCSP) 
Rl.RlSLOTCSP) 
PC,a(SP)» 

jRO 

iRl 



PUT RO IN STACK SLOT. 

PUT Rl IN STACK SLOT. 

RETURN TO PREG05 SUBRT 
LAST READ WORD CHECKED FOR CONDITION. 
REMAINING TIME (0 IF TIME-OUT OCCURED). 



62i; 



.WORD 



jCARRY - SET IF SUCCESS, CLEAR IF TIME-OUT. 



; STORAGE FOR THE LAST READ WORD, 



L7 



C/DHVBO DHUll TUNC TST PART2 
GLOBAL. ^LfBROUTINE 

3,?09 

3210 

3211 

3212 

3215 

3214 

3215 

3216 

3217 

3218 

3219 

3220 

3221 

322.- 

3223 

3224 

3225 

3226 

3227 

3226 

3229 

3230 

3231 

3232 

3235 

3234 

5235 

3236 

3237 

3238 

3239 

3240 

3241 

3242 

3243 
3244 
3245 
3246 
324/ 
3248 
3249 
3250 

3251 
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SEQ 89 



015044 
015044 



004567 167010 



01S050 004767 177654 



015054 
015054 
015056 



004 736 
000207 



SBTTL GLOBAL SUBROUTINE - MSLOOP ■ 

♦ - TEST LOOP SUBROUTINE - 

♦ THIS SUBROUTINF- IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. IT IS USED 

* TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME-OUT PERIOD. THE 

♦ CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 

• DESinEO CONDITION AND THE TIME-OUT VAL'JE IN MILLI -SECONDS. 

* THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 

• ROUTINE AND THEN ONCE EACH MILLI -SECOND THEREAFTER. 



I* INPUTS: 
;* 

i* 

i» 

!* 
I* 

;* OUTPUTS 

;* 

i* CALLING SEQUENCE 
1* 

I* 
;♦ 



HI - TIME-OUT VALUE IN MILLI-SECONOS (UP TO 64K M5>). 

R2 - BIT MAP OF BITS TO TEST (1 INDICATES TO TEST THE BIT), 

R3 - DESIRED STATES OF THE INDICATED FIELDS IN R2. 

R4 - ADDRESS OF THE WORD TO TEST. 

MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 

CARRY - SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME-OUT) 



JSR 



PC, MSLOOP 



COMMENTS: 



I* 
J* 
J* 
I* 



THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK. BUT THE 

CALIBRATION IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 

ON THE SYSTEM. 

THIS ROUTINE CAN BE USED AS A DELAY ROUTINE, BY SPECIFYING THE 

DESIRED DELAY AS THE TIME-OUT AND SPECIFYINt', A CONDITION TO 

LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 

IF A TIME-OUT VALUE OF IS SPECIFIED. THIS ROUTINE CHECKS FOR 

THE DESIRED CONDITION BEFORE RETURNING. IT INDICATES SUCCESS 

IF THE CONDITION IS MET. FAILURE OTHERWISE. 



• SUBORDINATE ROUTINES CALLED: MSLGET. 



MSLOOP: ; SAVE 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PR&G05 iCALL REGISTER SAVE SUBRT 



CALLING THE MSLGET ROUTINE f RUM THE MSLOOP ROUTINE ISOLATES THE CALLER OF 
MSLOOP FROM THE RETURNED TEST WORD AND REMAINING TIME-OUT VALUES. 



I - 



60$: 



JSR 

PASS 

RTS 



PC. MSLGET 

JSR 

PC 



iCALL THE MULTI-PURPOSE MS LOOP AND SEARCH RTN. 

iRESTORt GPRS. 

PC.aCSP)* jRETURN TO PREG05 SlfBHT 

I CARRY - SET IF SUCCESS. CLEAR IF TIME -OUT. 



MY 
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SEQ 90 



5?SJ 
3254 
3255 
3256 
325/ 
3258 
3259 
3260 
3261 
3262 
3263 
3264 
3265 
32d6 
3267 
3268 
3269 
3270 
3271 
3272 

3273 
3274 



3275 
3276 



3277 

3278 
3279 

3280 
3281 
3282 



015060 
015060 

015064 
015064 
015066 
015070 
015072 

015074 
015074 
015100 
015104 
015106 
015110 
015114 
015114 
015116 
015120 
015120 
015122 

015124 
015127 
C15132 
015135 
015140 
015143 
015146 
015151 
015154 
015157 
015162 
015165 
015170 
015173 
015176 
015201 



004567 166774 



104454 
000145 
015124 
000000 



012746 
012746 
010600 
104417 
062706 

104422 
000776 

004736 
000207 

110 
124 
117 
125 
122 
101 
127 
105 
122 
117 
127 
105 
125 
105 
117 
124 



015210 
000001 



000004 



117 
040 
115 
124 
040 
122 
101 
040 
040 
106 
101 
040 
107 
lib 
125 
105 



123 
105 
120 
105 
110 
104 
122 
117 
123 
124 
122 
102 
040 
103 
116 
122 



.SBTTL GLOBAL SUBROUTINE - OOPS - 

I* - PROGRAM ABORT SUBROL'TTNt - 

t* THIS SUBROUTINE IS USED TO ABORT THE PROGRAM WHEN A FATAL ERROR IS 

;♦ DETECTED IN THS: PROGRAM OR THE HOST SYSTEM HARDWARE. AN ERROR MESSAGE 

;♦ IS PRINTED GIVING SOME INFORMATION ABOUT THE NATURE OF THE ABORT. 

J* 

;* INPUTS: Rl - ERROR CODE GIVING REASON FOR ABORT. 

;♦ 

;♦ OUTPUTS: AN ERROR MESSAGE IS PRINTED. 

J* A LIST OF RETURN PC VALUES FOR ALL SUBROUTINE CALLS IS PRINTED. 

1* 

;* CALLING SEQUENCE: JSR PC, OOPS 

;• 

J* COMMENTS: 

U SUBORDINATE ROUTINES CALLED; NONE. 

OOPS:: SAVE jSAVE CONTENTS OF GPRS RO THRU R5 . 

JSR R5,PREG05 (CALL REGISTER SAVE SUBRT. 
i REPORT "HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED." ERROR. 
ERRSF lOl.EMOlOl 

TRAP 
.WORD 
.WORD 
.WORD 
J REPORT "PROGRAM HUNG. WAITING FOR A CONTROL-C." 
PRINTF <^EM0102 

MOV 
MOV 
MOV 
TRAP 
ADD 
jl.OOK roR OPERATOR CONTROL-C INPUT. 

TRAP 
J INFINITE LOOP. 

iDCN'T NEED THIS. BUT SOMEBODY MAY CHA:-4GE THIS 
PC.aCSP)* jRETURN TO PREG05 SUBRT. 

i ROUTINE IN THE FUTURE. SO BE CONSISTANT, 



2$: 
60$ 



BREAK 
BR 



RT' 



2i 



PC 



CJERSr 
101 

EMOlOl 




*EM0102, -CSP) 
01. -CSP) 
SP.RO 
C$PNTF 

fl4,SP 

CJBRK 



JSR 



EMOlOl:: .ASCIZ /HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED,/ 



CZDHVBO DHU^U TUNC TST PART2 
GLOBAL SLeROUTiNE 



3283 



3284 



O1S207 
015210 
015213 
015216 
015221 
015224 
015227 
015252 
015255 
015240 
015243 
015246 
015251 
015254 
01525V 
015262 
015265 
015270 
015275 
015276 
015501 
015304 



105 
000 
045 
101 
117 
101 
110 
107 
127 
124 
107 
117 
101 
117 
122 
055 
040 
052 
052 
052 
052 
045 
116 



104 

116 
120 
107 
115 
125 
054 
101 
111 
040 
122 
OAO 
116 
117 
105 
074 
052 
052 
052 
052 
116 
000 
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SEQ 91 



056 

045 
122 
122 
040 
116 
040 
111 
116 
106 
040 
103 
124 
114 
056 
052 
052 
052 
052 
052 
045 



EM0102:.' .ASCIZ /n^N^APROGRAM HUNG, WAITING FOR A CONTRCL-C. <+++*++**++++*«nj(N/ 



EVEN 



C^DHVBO 


0HL»-11 


rUNC TST 


PART2 


GLOBAL S16R0UTINE 




5^86 








328; 








3^88 








^269 








7.290 








3291 








3292 








3293 








3294 








3295 








329t) 








329; 








3298 








329Q 








3300 








3301 








3502 








3503 








3304 








3305 








3306 








3507 








3308 








3309 


015506 








015306 


004567 


166546 


3310 


015312 


016701 


164710 


3511 


015316 


016702 


164710 


3312 


015322 


042705 


177 760 


3313 


015326 


056705 


164 724 


3514 


015552 


010311 




5315 


015334 


011204 




3516 








3517 


015336 








015336 


010446 






015540 


012746 


01 1100 




015544 


012746 


005054 




015550 


012746 


000005 




015354 


010600 






015356 


104415 






015560 


062706 


000010 


3518 


015564 








015564 


004 7 56 




3319 015366 


000207 
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SEQ ^2 



.SBTTL GLOBAL S'JeR0UTI^4E - PRTLPR - 

-PRINT THC CONTENTS Of THE LPR. 
THIS ROUTINE 13 USED TO PRINT OUT EXTENDED INTORMATION ON THE 
CONTENTS Of" THE LINE PARAMETER REGISTER CLPR), 



INPUTS! 



OUTPUTS: 



R5 - CONTAINS THE NUMBER Of THE LINE YOU WISH TO EXAMINE. 

CSRA - COMTAINS THE ADDRESS OF* THE OUT'S CSR. 

lESTAT - CONTAINS THE CURRENT STATUS OF THE TX AND flx INTERRUPT 

ENABLE BITS IN THE DUT'S CSR. 
LPRA - CONTAINS THE ADDRESS OF THE OUT'S LPR REGISTER. 

AN EXTENDED INFORMATION MESSAGE IS PRINTED ON THE OPERATORS 
CONSOLE , 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, PRTLPR 



60i 



THIS ROUTINE CHANGES THE INDIRECT ADDRESS FIELD OF THE DEVICE 
UNDER TEST'S CSR. 

SUBORDINATE ROUTINES CALLED; NONE. 

I SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 (CALL REGISTER SAVE SUBRT, 

iGET THE CSR ADDRESS. 
I GET THE LPR ADDRESS. 
iCLEAR ANY UNWANTED BITS. 

iSET STATE OF TX AND RX INTERRUPT ENABLE BITS. 
iSELECT LINE. 
iGET CONTENTS OF THE LPR. 
iPRINT MESSAGE "CONTENTS OT THE LPRrNNNNNN" 
PRINTX ^EF9019,0EM9026.R4|PRINT OUT MESSAGE ON OPERATORS CONSOLE. 

MOV R4, (SP) 

MOV 0tM9026, ( SP ) 

MOV ♦Er9019, -CSP) 

MOV #5, CSP) 

MOV 5P.H0 

TRAP CIPNTX 

ADO 010. SP 

PASS iRESTORf. GPR^» 

JSR PC,9CSP>' iRtruRN TO PREG05 iiUSRT. 

RTS K 



PRTLPRnSAVE 






JSR 


MOV 


CSRA.Rl 


MOV 


LPRA,R2 


BIC 


#177760, R5 


BIS 


IESTAT.R3 


MOV 


R5,(R1) 


MOV 


(R2).R4 



8^8g)irsP^'oih^^^'^ ''' ""'''' "WiPi 
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SEQ 95 



35? I 
55.V 
35.:? 
3524 
3325 
5526 
332: 
3328 
332*^ 
3330 
3531 
3332 
3333 
3334 
3335 
3356 
3557 
3338 
3559 
3340 

3341 
3342 

3345 
3344 
3345 
3546 
3547 
3548 
3549 
3350 
5551 
5552 
5555 
5554 
3555 
3556 
3557 
3556 
5359 
3560 
5361 
3362 
3565 
3564 
3565 
5566 
5567 

5568 
3369 



015370 
015570 
015574 
015400 

015404 
015406 



015410 
015414 
015416 



015420 
015424 
015426 
015430 

015434 
015436 
015440 
015442 
015444 

015446 
01S446 

015450 



004567 

012701 
016704 

011402 
100016 



012700 
040200 
001006 



012700 
O40200 
001002 
004767 

005301 
00156.^ 
00024 
000401 

000261 



004 756 
000207 



166464 
001000 
164624 



070000 



000501 
001044 



,SBTTL GLOBAL SUBROUTINE - PUFiro 

• - PURGE THE riro 

♦ THIS ROUTINE TRIES TO REMOVE ALL THE CHARACTERS FROM THE FIFO. 

• ANY BMP CODES THAT ARE FOUND ARE SAVED ON THE BMP CODE QUEUE. 
* 

• INPUTS: RBUFA- CONTAINS THE ADDRESS OF THE RECEIVER, 

* OUTPUTS: CARRY BIT - INDICATES THE STATE OF THE FIFO, SET:" PURGED. 

• BMPCQ - THE CONTENTS OF THE BMP CODE QUEUE MAY BE UPOATED. 
* 

♦ CALLING SEQUENCE: JSR PCPU^IFQ 

* COMMENTS: 

• SUBORDINATE ROUTINES CALLED: 5AVBMP. 

I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 

(SET MAXIMUM TRY COUNT OF 512. 
(GET ADDRESS OF THE RECEIVER BUFFER REGISTER. 

iGET THE CONTENTS OF THE RECEIVER BUFFER REG. 
lEXIT IF THE FIFO IS EMPTY, DATA. VALID CLR. 

I CHECK IF THE READ CHARACTER IS ACTUALLY A BMP CODE. 

I IF IT IS, THEN SAVE IT ON THE BMP CODE QUEUE TO BE REPORTED LATER. 

MOV #70000. RO I GENERATE A BIT MAP OF CHAR cRROR BITS 

BIC R2.R0 I UHICH ARE NOT SET FOR CHAR. 

BNE 41 (THROW CHAR AWAY IF NOT BMP OR SELF TEST CODE. 

/check if the READ DATA IS MODEM STATUS , BMP OR SELF TEST?. 

MOV #501. RO I CHECK IF BMP. 

Die R2.R0 (TRY TO CLEAR BMP FLAGS IN THE READ DATA. 

BNE 41 (IF IT IS MODEM OR SELFTEST CODE THROW IT AwAY . 

JSR PC.SAVBHP (SAVE BMP CODE ON THE QUEUE. 



PUFIFO: 


:SAVE 






MOV 
MOV 


#512.. Rl 
RBUFA.R4 


21: 


MOV 
BPL 


(R4),R2 
61 



41: 

6(: 
601 i 



DEC 
BNE 

CLC 
BR 
SEC 

PASS 



RTii 



Rl 

60J 



JSR 



PC 



(DECREMENT THE TRY COUNT. 

(LOOP TO TRr AGAIN. 

(CLEAR CARRY. TO INDICATE FIFO NOT Pi.«GED. 

(EXIT WITH CARRY CLEAR. 

(SET CARRY. TO INDICATE FTFQ PURGED. 

(RESTORE OPRS, 

PC,8CSP)» (RETURN TO PREG05 SUBRT. 

iCARRt BIT, SET INDICATES FIFO PURGED. 



S^BBXPsBgHoAh!;.^'^ 



TST PART9 MA 



P6P1PA 
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3EQ 94 



5J71 
3572 
35;? 
3574 
357S 

3576 
35::^ 
3378 
337Q 
3380 
3581 
358c> 
3385 
3584 
5585 
3586 
5587 
3588 
3589 
3590 
3591 
3592 
3595 
3394 
3395 
3596 
3597 
3598 
3599 

5400 
3401 
3402 
3403 
3404 
3405 
3406 
5407 
5408 
3409 
3410 
3411 
3412 
3415 
3414 
3415 
3416 
3417 
3418 
3419 
5420 
3421 
3422 
5425 
3424 
5425 
5426 



SBiTU GLOBAL SUBROUTINE 



- PUFIFR 



015452 
015452 
015456 
015462 



015466 
015472 



015474 
015500 
015502 



015504 
015512 
015516 
015520 
015522 
015526 



« 

* 
* 

♦ INPUTS: 

* 
* 

* OUTPUTS: 

* 
* 
« 

* 



- PURGE FIFO REPOnT ANY ERRORS FOUND. 

THIS ROUTINE REMOVES ALL DATA TROM THE FIFO. ANY BMP CODES THAT ARE 

FOUND ARE SAVE ON THE QUEUE TO BE REPORTED LATER IN THE BMP REPORT TEST. 

ANY UNXEPECTEO DATA (IE ANY NON-STATUS INFORAMTION) THAT ARE FOUND. 

ARE REPORTED AS AN ERROR. 

IF THE FIFO WILL NOT PURGE AFTER 512 ATTEMPTS. THEN THE CURRENT 

THAT CALLED THIS ROUTINE RECEIVES A FAILURE FLAG THAT SHOULD BE USED 

TO ABORT THE TEST, 

ERRTBL - ERRTYPE, ERRMSG. ERRN6R ARE SET UP CORRECTLY. 
RBUFA- CONTAINS THE ADDRESS OF THE RECEIVER. 



TEST 



CARRY Bir . ABORT TEST FLAG. CLR - ABORT TEST, SET 
ERRBLK - VALUE WILL BE OASTROYED. 

BMPCQP - THE BMP CODE QUEUE POINTER MAY BE UPDATED, 
THE CONTENTS OF TH'3 BMP CODE QUEUE MAY BE UDATED. 



OK 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC. PUFIFR 



THIS ROUTINE REPORTS ERliORS WXTH NUMBERS INITIAL ERRNBR 

THRU TO ERR(«R«2. 

THE ERRNBR IS RESTORED TO ITS INITIAL VALUE BEFORE RETURNING. 

SUBORDINATE ROUTINES CALLED: ER1603.ER9001.ER9002,SAVBMP. 



004567 166402 
016746 166570 
012705 001000 



PU'IFRj jSAVE 

MOV 
MOV 



JSR 
ERRNBR. -CSP) 
0512., R5 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 (CALL REGISTER SAVE SU6RT. 
iSAVE THE CONTENTS Of THE ERROR NJMBER. 
(SET MAXIMUM READ COUNTER TO 2*FIF0 SIZE. 



017702 
100063 



164536 



I READ 

t 

t - 

2» 



DATA FROM THE 
REPORT ANY BMP OR 



FIFO UNTIL 
UNEXPECTED 



DATA VALID IS CLEAR 
DATA AS ERRORS. 



OF READ COUNTER IS ZERO. 



MOV 
bPL 



aflBUFA,R2 

et 



iGET THE CONTENTS OF THE RECEIVER 6UFFFR REG. 
lEXIT IF DATA VALID CLEAR. IE. FIFO PURGED. 



012700 070000 

040200 

001012 



CHECK IF READ DATA IS STATUS OR UNEXPECTED CHARACTER. 



MOV 
BIC 
BNE 



70000, RO 

R2,R0 

41 



iGENERATE A BIT 
I WHICH ARE NOT 
I SKIP BMP CHECK 



MAP OF CHAR ERROR BITS 

SET FOR CHAR. 

IF IT IS UNEXPECTED DATA. 



012767 
012700 
040200 
001003 
004 767 

000450 



012544 
000300 



000752 



166544 



CHECK If THE READ DATA IS 
IF IT IS A BMP CODE THEN 



MODEM STATUS , BMP OR 
SAVE IT ON THE QUEUE. 



SELFTEST?. 



MOV OER9001. ERRBLK 

MOV #500. RO 

BIC R2,R0 

BNE 4« 

JSR PC.SAVBMP 

BR 6* 



(SET UP THE CORRECT ERROR REPORTING ROUTINE 

I CHECK IF BMP OR SELFTEST?. 

I TRY TO CLEAR BMP FLAGS IN THE READ 

I SKIP BMP ERROR REPORT IF MODEM OR 

I SAVE THE BMP CODE ON THE QUEUE. 

jBRANCH TO CHECK READ COUNT. 



DATA 
SELFTEST?. 



CHECK IF THE READ DATA IS MODEM. SELFTEST OR UNEXPECTED DATA. 



CZOHVBO DHUll FUNC TST PART2 MACRO M1200 15-MAR-84 09:26 
GLOBAl. SUBROUTINE - PUFIFR - 



E8 

PAGE 73-1 



sen 95 



3427 
3426 
3429 
3430 
3431 
3432 
3433 
3434 
3435 
3436 
3437 
3436 

3459 
3440 
3441 
3442 
3443 
3444 
3445 
3446 
3447 
3448 
3449 
3450 
3451 
3452 
3453 
3454 
3455 
3456 
3457 
5456 
3459 

3460 
3461 
3462 
3463 
3464 
3465 
3466 

3467 
3468 
3469 



015550 
015534 
015536 
0X5542 
015544 
015546 
015552 
015554 
015560 
015564 

015572 
015572 



015574 
015602 



032702 
001425 
012701 
010203 
000303 
042703 
006303 
052704 
005267 
012767 



104460 



032767 
001415 



015610 
015612 



015614 
015622 
015630 



015634 
015634 
015636 
015640 

015642 

015644 
015650 
015650 



005305 
001325 



062767 
012767 
012701 



104460 
000241 
000401 

000261 

012667 

004736 



000001 
011124 

177760 

100000 
166266 
012644 



4$ 



166264 



BIT 
BEQ 
MOV 
MOV 
SWAB 
BIC 
ASL 
BIS 
INC 
MOV 



(TEST THE MODEM STATUS INDICATION BIT. 
iDO NOT REPORT ANY ERROR IF MODEM STATUS. 
(PASS THE CORRECT ERROR MESSAGE TO REPORT. 
I EXTRACT IHE LINE NUMBER FROM 
t THE READ DATA. 



I 



*BIT0,R2 

6» 

#EM9104,R1 

R2.R5 

R3 

*177760.R3 

R3 jFORM LINE NUMBER TIMES 2 FOR ER9002 ROUTINE. 

^ffiIT15,R4 iSET THE "KONE" EXPECTED MAESSAGE FLAG. 

ERRNBR I SET ERROR NUMBER TO INTIAL ERRBR*1. 

^>ER900^.ERRBLK i SELECT THE CORRECT ERROR REPORTING ROUTINE. 
iREPORT ERROR "UNEXPECTED DATA FOUND IN FIFO". 
ERROR I >>>>> ERROR <<<<<, 

TRAP CJERROR 



1 ♦ 



000100 164406 



I EXIT WITH FAILURE IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

lEXlT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

lOURING THE SOFTWARE QUESTIONS. 



BIT 
BEQ 



*BIT06. OPTION 
71 



015604 005367 166242 



6$ 



I 



DEC 

DEC 
BNE 



ERRNBR 

R5 
21 



iHESTORE ERROR NUMBER TO INTIAL ERRNBR. 

iDECREMENT READ COUNTER. 

tLOOP TO READ NEXT CHAR FROM FIFO IF COUNT > 0. 



000002 
012020 
010767 



166230 
166226 



166202 



015652 000207 



THE FIFO WILL NOT CLEAR, REPORT THE ERROR AND INDICATE THAT THE TEST IS TO 
I BE ABORTED. 

ADD #2, ERRNBR (SET ERROR NUMBER TO INTIAL ERRNBR»2. 
MOV 0ER1603.ERRBLK (SELECT THE CORRECT ERROR REPORTING ROUTINE, 
MOV *EM9017,R1 iPASS THE MESSAGE TO BE REPORTED. 
(REPORT THE ERROR "FIFO WILL NOT PURGE, (DATA VALID STUCK SET)" 
I "?????? TEST ABORTED". 

ERROR I >>>>> ERROR <<<<<. 

TRAP C*ERROR 
iINOICATE THE TEST IS TO BE ABOflTED. 
lEXIT THIS ROUTINE AND ABORT THE CURRENT TEST. 

iSET THE CARRY, DO NOT ABORT THE TEST. 

iRESTORE INITIAL ERROR NUMBER. 

I RE ST ORE GPRS 

PC,SCSP)» ' iRETURN TO PREG05 SL«RT. 

jCARRy bit. SET INDICATES FIFO PURGED, 00 NOT 

» ABORT THE TEST. 



7$: 


CLC 
BP 


10$ 




8i: 


SEC 






10$: 
60$ t 


MOV 
PASS 


(SP)» 


, ERRNBR 
JSR 



RTS 



PC 



CZDHVBO Dl-U 11 FUNC TST PART2 
GLOBAL SltB^OUTINE 

3471 
3472 
3473 
3474 
3475 
3476 
34 ,'7 



3479 
3480 
3481 
3482 
3483 
3484 
3485 
3486 
3487 
3488 
3489 
3490 
3491 



MACRO M1200 
- READBX - 



F8 
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SEQ 96 



3492 
3493 
3494 
349-- 
3496 
3497 
3498 
3499 
3500 
3501 
3502 
3503 
3504 
3505 
3:06 
3507 
3508 
3509 
3510 
3511 
3512 
3513 



3514 



015654 
015654 
015660 
015662 
015666 
015670 



004567 
005001 
016703 
011302 
100015 



015672 
015676 
015700 
015704 
015706 
015712 
015714 
015716 
015^20 
015722 
015724 

015726 
015726 
015732 
015734 



004767 
103410 
120227 
001003 
012701 
000402 
005300 
001363 
000261 
000401 
000241 



010166 
004 756 
000207 



- READ CHARACTERS PROM THE FIFO AND CHECKS FOR BMPS AND XONS- 

THIS SUBROUTINE IS USED IN THE FIHAVL.TST. 

IT READS THE SPECIFIED NUMBER OF CHARACTERS FROM THE FIFO AND CHECKS 

FOR BMP CODES AND XON CHARACTERS. 



SBTTL GLOBAL SUBROUTINE - READBX - 

* 

* 

* 
* 



INPUTS: 
OUTPUTS: 



RO - CONTAINS THE NUMBER OF CHARS TO READ FROh THE FIFO. 

Rl - CONTAINS ADDRESS OF ERROR MESSAGE TO BE REPORTED 

CLEAR IF NO ERROR FO'JND. 
CARRY USED TO INDICATE IF FIFO WAS FOUND EMPTY, CARRY CLEAR. 



JSR 



PC, READ 



CALLING SEQUENCE; 

COMMENTS : 

SUBORDINATE ROUTINES CALLED: CHKBMP. 



166200 
164342 



READBX: : SAVE 



2$ 



CLR 
MOV 
MOV 
BPL 



(SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PREG05 (CALL REGISTER SAVE SUBRT. 

Rl iCLEAR GPR THAT HOLDS THE ADDRESS OF ERRMSG 

RBUFA,R3 (GET THE ADDRESS OF THE RECEIVER BUFFER REG 

CR3),R2 (HEAD A CHARACTER FROM THE FIFO. 

6$ (BRANCH IF FIFO IS EMPTY. 



176100 
000021 
006520 



i - 



CHECK IF THE READ CHARACTER IS A BMP CODE. 
IF IT IS A BMP CODE SAVE IT ON THE QUEUE TO BE REPORTED LATER, AND 
ABORT THE TEST. 

I CHECK IF CHARACTER IS A UMP CODE. 

i BRANCH IF A BMP CODE WAS FOUND. 

(CHECK IF I r IS AN XON. 

(BRANCH If NOT AN XON. 

(PASS THE MESSAGE TO BE REPORTED. 

(GO EXIT TEST. 

(DECREMENT THt READ COUNT. 

(SET CARRY TO INDICATE SUCCESS. 

(EXIT 

(CLEAR CARRY BIT TO INDICATE FAILURE. 





JSR 


PC, CHKBMP 




BCS 


6% 




Ct^B 


R2,021 




BNE 


41 




MOV 


<^EM5402.R1 




BR 


6S 


4$: 


DEC 


RO 




BNE 


2$ 


61: 


SEC 






BR 


60$ 


8$: 


CLC 





000004 



60 J: 



PASS 



RTS 



Rl 



PC 



(RESTORE GPRS. 
MOV Rl.RlSLOTCSP) 
JSR PC.aCSP)* 



(PUT Rl IN STACK SLOT. 
(RETURN TO PREG05 SUBRT. 



G8 



8L'8g)iP°':>8gHo6hf.^'^^ '^' 


PART2 


3516 








3:>i7 








351ft 








3519 








3520 








3521 








3522 








3523 








3524 








3525 








3526 








3527 








3528 








3529 








3530 








3531 








3532 








3533 








3534 








3535 








3536 








3537 








3538 








3539 








3540 








3541 








3542 








3543 








3544 








3545 








3546 








354 7 








3548 








3549 


015756 








015736 


004567 


166116 


3550 


015742 


005067 


000304 


3551 


015746 


012705 


000200 


3552 


015752 


000241 




3553 


015754 


017702 


164250 


3554 


015760 


100132 




3555 








3556 








3557 








3558 


015762 


012700 


170301 


3559 


015766 


040200 




3560 


015770 


001004 




3561 


015772 


004767 


000502 


3562 


015776 


005505 




3565 


016000 


001364 




3564 








3565 








3566 








3567 


016002 


010205 




3568 


016004 


042702 


17 7400 


3569 


016010 


120205 




3570 


016012 


001432 




5571 


016014 


012767 


000001 



'^'mo^h''-'' 
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SEQ 97 



. SBTTL GLOBAL SUBROUTINE - REPDER - 

- REPORT DATA ERRORS - 
THIS SUBROUTINE IS USED TO REPORT INCORRECT CHARACTERS AND LINE 
NUMBERS IN A WORD Or DATA READ FROM THE RXFIFO. THIS ROUTINE 
CHECKS FOR THE NUMBER OF INDIVIDUAL DATA ERRCf^S ON A LINE EXCEEDING 
THE REQUESTED AMOUNT AND SETS THE APPROAIATE ERROR SUMMARY FLAG. IT 
THEN STOPS REPORTING ANY FURTHER ERRORS ON THAT LINE. ANY BMP CODES 
FOUND ARE SAVED ON THE BM? CODE QUEUE TO BE REPORTED LATER AND ANOTHER 
CHARACTER IS READ FROM THE RXFIFO, 



INPUTS: 



Rl - CONTAINS THE NUMBER OF THE UUT . 

R3 - LOW BYTE CONTAINS THE EXPECTED CHAR. 

ERCNTB - ADDRESS OF THE BASE OF THE ERROR SUMMARY TABLE. 

ERRBLK - ADDRESS OF ERROR REPORTING ROUTINE IN ERROR TABLE. 

ERRNBR - SET TO THE ERROR NUMBER OF THE FIRST ERROR IN THIS ROUTINE 

EXOERR - ADDRESS OF "EXIT ON ERROR" FLAG. 



OUTPUTS: 



CARRY 

ERCNTB 

ERRBLK 

ERSMRF 

EXOERR 



CLEAR IF RXFIFO UAS EMPTY. SET OTHERWISE. 

CONTENTS UPDATED TO REFLECT THE CURRENT STATE. 

CONTENTS MAY BE ALTERED. 

ERROR SUMMARY FLAGS UPDATED. 
• 1 IF AT LEAST ONE ERROR OCCURED. 

IF NO ERRORS OCCURED. 



CALLING SEQUENCE: 
COMMENTS: 



J5R 



PC. REPDER 



THIS ROUTINE REPORTS ERRORS WITH NVJt«lf;RS INITIAL ERRI^R 
THRU INITIAL ERRNBR^l. 

SUBORDINATE ROUTINES CALLED: NONE 



REPDER:: SAVE 



2$: 



CLR 
MOV 
CLC 
MOV 
BPL 



62» 

0128. ,R5 

aRBUFA,R2 
61i 



JSR 



R5,PREG05 jCALL REGISTER SAVE SU6RT. 

(CLEAR THE "AN ERROR OCCURED" IWICATOR. 

iSET THE MAX BMP READ COUNT. 

iCLEAR THE CARRY IN CASE THE FIFO IS EMPTY. 

(READ THE RXFIFO. 

(EXIT THIS SUBROUTINE WITH CARRY CLEAR IF FIFO EMPTY 



I ♦ 



CHECK IF THE CHARACTER IS A BMP CODE. 



; • 



MOV 0170501, RO 

ere R2,R0 

BNE 4$ 

JSR PC.SAVBhP 

DEC R5 

BNE 2$ 



I SET UP THE BIT MASK FOR A BMP CODE. 

(TRY AND CLEAR THE BIT MASK. 

(AVOID SAVING THE CODE IF IT IS NOT A BMP CODE. 

I SAVE THE BMP CODE ON THE QUEUE. 

(DECREMENT THE MAX BMP READ COUNT. 

(READ ANOTHER CHARACTER FROM THE RXFIFO. 



I VERIFY THAT THE READ CHARACTER IS CORRECT. 



J 
4$: 



000250 



MOV 
SIC 
CMPB 
BEQ 

MOV 



R2.R5 

0177400, R2 

R2,R5 

6« 

01,62$ 



I SAVE THE R'fAD DATA. 

(CLEAR THE CLUTTER FROM THE DATA CHAR. 
(COMPARE THE READ CHAR WITH THE EXPECTED CHAR. 
(AVOID THE ERROR REPORT IF THE DATA IS CORRECT. 
(INDICATE AN ERROR HAS OCCURED. 



^l 



^sP^oifif-r ''' '''''' 



WXCRQ Ml 
. REPOER 



H8 

200 15 -MAR -84 09:28 PAGE 75-1 



SEQ 98 



3572 016022 


010104 






3575 016024 


006304 






3574 016026 


036467 


002336 


164556 


3575 








3576 016034 


001021 






3577 016036 


010104 






3578 016040 


110501 






3579 016042 


012 703 


010120 




3580 








3581 016046 


012767 


012276 


166002 


3582 016054 








016054 


104460 






3583 016056 


010401 






3584 016060 


052767 


000100 


164122 


3585 016066 


001004 






3586 016070 


012767 


000001 


164154 


3587 016076 


000462 






3588 








3589 








3590 








3591 








3592 016100 


010502 






3593 016102 


000302 






3594 016104 


042702 


177760 




3595 016110 


020201 






3596 016112 


001433 






3597 016114 


012767 


000001 


000150 


3598 016122 


010104 






3599 016124 


006504 






3600 016126 


036467 


002336 


164456 


3601 








3602 016134 


001022 






3603 016136 


005267 


165710 




3604 016142 


012703 


010165 




3605 








3606 016146 


012767 


0J2170 


165702 


3607 016154 








016154 


1C4460 






3608 016156 


005367 


165670 




3609 016162 


C32767 


000100 


164020 


3610 016170 


001004 






3611 016172 


012767 


000001 


164052 


3612 016200 


000421 






3613 








3614 








3615 








3616 








5617 








3618 016202 


005767 


164004 




3619 016206 


001416 






3620 016210 


005767 


000036 




5621 016214 


001413 






3622 016216 


010104 






3623 016220 


006504 






3624 016222 


005264 


002614 




3625 016226 


026764 


165760 


002614 


3626 









MOV 
ASL. 
BIT 

BNE 
MOV 
MOVB 

MOV 

MOV 
ERROR 

MOV 
BIT 

BNE 
MOV 

BR 



R1,R4 I COPY THE LINE NUMBER. 

R4 (CONVERT THE LINE NUMBER TO AN OrrSET VALUE. 

BITTBLCR4),ERSMRF (TEST WHETHcR ERROR SUMMARY REPORTING IS IN 

lEFFECT i-OR THIS LINE. 

lAVOID THE ERROR REPORT IF IT IS. 

I PASS THE LINE NUMBER TO THE ERROR ROUTINE. 

I PASS THE EXPECTED DATA CHAR, 

I PASS THE ERROR MESSAGE, 

I "TXFIFO BAD. RECIEVED CHAR INCORRECT, ON LINE XX 



6$ 

R1.R4 

R3,R1 

*EM6004,R3 



#ER6001,ERRBLK 



R4,R1 

OBIT06, OPTION 
61 

«1,EX0ERR 
60$ 



;SET UP THE ERROR REPORTING ROUTINE. 
I REPORT THE ERROR. 

TRAP CSERROR 
(RESTORE THE LINE. NUMBER. 

iHAS EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 
(AVOID THE EXITING IF IT HAS. 
I INDICATE THAT THE TEST IS TO BE EXITED. 
lEXlT THIS SUBROUTINE. 



i ♦ 



NOW CHECK THAT THE LINE NUMBER OF THE DATA READ FROM THE RXFIFO IS CORRECT 



6(: 



MOV 


R5.R2 il 


SUAB 


R2 |i 


BIC 


#177760, R2 1 


CMP 


R2,R1 » 


BEQ 


d» t 


MOV 


01,62$ 1 


MOV 


R1.R4 1 


ASL 


R4 1 


BIT 


BITTBLCR4).ERSMRF 


BNE 


6$ t 


INC 


ERPNBR 1 


MOV 


#EM6005,R3 i 


MOV 


*ER5901,ERRBLK i 


ERROR 




DEC 


ERRN6R 1 


BIT 


#fllT06. OPTION t 


BNE 


8$ 1 


MOV 


#1,EX0ERR » 


BR 


60$ t 



RESTORE THE DATA READ FROM THE RXFIFO. 

PLACE THE LINE NUMBER IN THE LOU BYTE. 

CLEAR THE CLUTTER FROM THE LINE NUMBER. 

COMPARE WITH THE EXPECTED LINE NUMBER. 

AVOID THE ERROR REPORT IF THE NUMBER IS CORRECT. 

INDICATE THAT AT LEAST ONE ERROR HAS BEEN FOUND. 

COPY THE LINE NUMBER. 

CONVERT THE LINE NUMBER TO AN OFFSET VALUE. 

I TEST WHETHER ERROR SUMMARY REPORTING IS IN 
EFFECT FOR THIS LINE. 
AVOID THE ERROR REPORT IF IT IS. 
SET THE ERROR NUMBER TO INITIAL*!. 
PASS THE MESSAGE, 

"TXFIFO BAD. CHAR TRANSMITTED ON WRONG LINE" 
SET UP THE ERROR REPORTING ROUTINE. 
REPORT THE ERROR. 

TRAP C$ERROR 
SET THE ERROR NUMBER TO INITTAL. 
HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
AVOID SETTIhJG THE "EXIT ON ERROR" FLAG IF IT HAS 
SET THE FLAG. 
EXIT THIS SUBROUTINE. 



I ♦ 



I UPDATE THE ERROR COUNT IN THE ERROR SUMMARY TABLE IF NECESSARY, AND UPDATE 
THE ERROR SUMMARY FLAGS IF NECESSARY. 



1 
8$ 



T5T 


NOERPT 


BEQ 


60$ 


TST 


62$ 


BEQ 


60$ 


MOV 


R1.R4 


ASL 


R4 


INC 


ERCNTBCR4) 


CMP 


NDERPT.ERC 



I TEST IF SUMMARY REPORTING HAS BEEN REQUESTED. 

lEXlT THIS SUBROUTINE IF IT HASN'T. 

(TEST IF AN ERROR HAS BEEN FOUND. 

lEXIT THIS SUBROUTINE IF NO ERRORS. 

iCOPY THE LINE NUMBER. 

iCONVERT THE LINE NUMBER TO AN OFFSET VALUE. 

t INCREMENT THE APPROPRIATE ERROR COUNT. 

) iCOMPARE THE NUMBER OF ERRORS REPORTED WITH, 

I THE NUMBER REQUESTED. 



C7DHVBC DHU-11 TUNC TST PART2 
GLOBAL SUBROUTINE 



3627 016234 

3628 

3629 

3630 016236 

3631 

3632 016244 

3633 016246 
016246 

3634 016250 

3635 016252 



101003 

056467 

000261 

004756 
000207 
000000 



MACRO M1200 
- REPDF.R - 



002356 164346 



60$ 
61$ 



62$ 



18 
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BHI 



BIS 

SEC 
PASS 

RTS 
.WORD 



SEQ 99 



60$ (AVOID SETTING THE ERROR SUMMARY KLAG IF THE 

(NUMBER OF ERRORS REPORTED IS LESS THAN THE 
(NUMBER REQUESTED. 

BITTBLfR4).ERSMRF (OTHERWISE SET THE APPROIATE ERROR FLAG. 

(SET THE CARRY FLAG AND INDICATE SUCCESS. 

JSR PC.S(SP)* (RETURN TO PREG05 SU6RT. 

PC 
(STRORAGE FOR THE "AT LEAST ONE ERROR" INDICATOR. 



C70HVBO OHU 11 KUNC TST PART2 
GLOBAL Sl^BROUTINE 



5b 5 7 
5b?ti 

?640 
Jt.41 
364^ 
3fc43 
3644 
364S 
3646 
564; 
3648 
5649 
3650 
3651 
3652 
3653 
3654 
3655 
3656 
3657 
3658 
3659 
3660 
3661 
366i? 
5663 



MACRO M1200 
RtPSMR - 
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3664 
3665 
3666 
5667 
3668 
3669 
3670 
5671 
3672 
36 73 
3674 

3675 
3676 



016254 
016254 
016260 
016264 



004567 
005767 
001404 



165600 
164326 



016266 012767 013022 165562 



016.: 74 
016274 



104460 



016276 
016276 004 7?;6 
5677 016300 000207 



BTTL GLOBAL SUBROUTINE - REPSMR - 

- REPORT ERROR SUMMARY ROUTINE - 
THIS SUBROUTINE REPORTS AN ERROR SUMMARY FOR THOSE LINES WHICH HAVE 
EXCEEDED THE N»JMGER OF INDIVIDUAL ERRORS TO REPORT FOR A SINGLE LINE 
IN A SINGLE TEST. THIS PARAMETER CAN BE SPECIFIED BY THE OPERATOR IF 
HE/SHE ANSWERS THE SOFTWARE PARAMETER QUESTIONS. 

INPUTS: ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 

ERRMSG - ADDRESS 0*^ PRIMARY ERROR MESSAGE. 

ERRNBR - ERROR NUMBER OF ERRORS IN THIS ROUTINE. 

ERSMRF - "REPORT ERROR fjUMMARY FOf» LINE" FLAGS. 

OUTPU:S: ERRBLK - ADDRESS OF ERROR REPORTING ROUTINE (DESTROYED). 
SUMMARY MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, REPSMR 



IF NO LINES HAVE EXCEEDED THE MAXIMUM NUMBER OF INDIVIDUAL 
ERRORS TO REPORT, NO MESSAGES ARE PRIMED BY THIS ROUTINE. 
ERROR SUMMARIES IN THIS ROUTINE ARE REPORTED AS ERRORS. 
THE CONTENTS OF ERRBLK ARE DESTROYED. 

SieORDINATE ROUTINES CALLED: 



REPSMR: : SAVE 

TST ERSMRF 
BEQ 601 



tSAVE CONTENTS OF GPRS RU THRU R5 . 
JSR R5,PREG05 iCALL REGISTER SAVE SU6RT . 

J CHECK THE "PRINT LINE ERROR SUMMARY" FLAGS. 
lEXIT WITHOUT ACTION IF NO SUMMARY FLAGS SET. 



WE HAVE SOME ERROR SLIMMARIES TO REPORT. 

MOV *ER9004. ERRBLK jSELECT ERROR REPORTING ROUTINE. 

J REPORT 

; "ERROR SUMMARY REPORT FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS:" 

ERROR 

TRAP CiERROR 



60 1 



PASS 
RTS 



PC 



t RE STORE GPRS. 
JSR PCRCSP)* 



SEQ 100 



:RFTURN TO PREG05 SU6RT 



I<8 



C/DhvBO OHU U fUNC TST PART2 
GLOBAL SLtBROUTINE 



3679 
3680 
3681 
3682 
368? 
3684 
3685 
3686 
3687 
3688 
368'-^ 
^690 
3691 
3692 
3695 
3694 
3695 
3696 
3697 
3698 
3699 
3700 
3701 
3702 
3/03 
3704 



MACRO M1200 
- RESET! - 
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SEQ 101 



3705 
3706 
3707 
3708 
3709 
3710 
3711 
3712 
3713 
3714 
3715 
3716 
3717 
3718 
3719 
3 720 
3721 
3722 
3723 
3724 
3725 
3726 
3727 
3728 
3729 
3 730 
3731 
3732 
3733 
3734 



016302 
016302 
016306 



004567 
012702 



165552 
000040 



016312 
016316 
016320 
016322 
016324 
016330 
016334 



016704 
030214 
001406 
005003 
012701 
004 767 
103012 



163710 



011610 
176374 



016336 
016342 



010277 
004767 



163664 
000246 



SBTTL GLOBAL SUBROUTINE - RESET! - 



;* 
;* 
;* 

!* 

I* 
I* 
:* 

;♦ 

1 ♦ 



- RESET DEVICE UNDER TEST - 
THIS SUBROUTINE IS USED TO RESET THE OUT TO 
ir RESET DOES NOT SUCCESFULLY COMPLETE. IE. 
AN ABORT TEST ERROR MESSAGE IS REPORTED. 



A KNOWN STATE. 
TIME-OUT OCCURS. 



THEN 



INPUTS: 



* OUTPUTS: 



1 



• * 
I* 

* 



CSRA - 
TXBFCA 
ERRTBL- 

THE DUT 
CARRY - 
ERR8LK 
lESTAT 
TX ANL 



CONTAINS THE ADDRESS Of THE. CSR 

- CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGIS!ER. 
ERRTYP.ERNBR.ANO ERRMSG SET UP CORReC!LY, 

PERFORMS I!S RESET FUNCTION INTO A KNOWN STATE. 
CLEAR INDICATES THE TEST IS TO BE Ai?CRTED. 

- VALUE MAY BE DESTROYED. 

- TX AND RX INTERRUPT FLAGS ARE CLEARED. 

RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 



CALLING SEQUENCE: 
COMMt-Wr^i: 



JSR 



PC, RESETT 



THIS ^JUr^ouTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERRN8R 
THIS ROUTINE DOES NOT DESTROY THE VALUE Or ERRNBR. 



V SUtluRDlNATE ROUTINES CALLED: DELAY .MSLGET . 



RESET!:: SAVE 
MOV 



JSR 
<«IT05.R2 



(SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 (CALL REGISTER SAVE SU8RT 
(SET BIT MASK OF MASTER RESET BIT. 



TEST THE STATE OF THE MASTER RESET BIT IN THE CSR. 
IF MR IS SE! THEN WAI! FOR SELF-IEST TO COMPLETE. 
IF TIME-OUT OCCUt^S. REPORT THE ERROR AND PASS-OUT ABORT TEST INDICATOR 



MOV 
Bj.' 

BEQ 
CL'^ 
hf^V 

JSfC 

8CC 



CSRA,R4 

R2.CR4) 

21 

R3 

^5000. ,R1 

PC. MSLGET 

4$ 



t * 

I SET MASltiR RESE! BIT IN CSR. 

t SKIP THE SELFTEjT. 

i TIME-OUT OF 5 SECS, JUST IN 

2J: MOV R2,idCSRA 
JSR PC.SKPSTS 



iGET THE ADDRESS OF THE OUT'S CSR. 

(CHECK STATE OF MASTER RESET BIT. 

jDON'T DELAY IF MR IS ALREADY CLEAR. 

iSET UP DESIRED STATE OF MASTER RESET BIT. 

iPASS IIME-OUT VALUE OF 5 SECONDS. 

I WAIT FOR SELF -TEST TO COMPLETE, MR CLEA«, 

J GO REPORT ERROR IF TIMEOUT OCCURRED. 



CLEAR TX AND RX ENABLE BUS. ETC. 

CASE THE SELF-TEST EXECUTES. 

iSE! MASTER RESE! BIT, DISABLE !X AND RX IN!S 
I TRY TO SKIP THE SELFTEST. 



i SET SELF-TEST TIME-OUT OF 5 SECONDS, AND WAIT Fu.^ M.R TO CLEAR, 

I IF TIME-OUT OCCURS, THEN REPORT THE FATAL ERROR AND PASS-OUT THE ABORT 

i TEST INDICATOR. 



016346 
016350 
016354 
016360 



005003 
012701 
004/67 
103410 



011610 
176350 



CLR 
MOV 
JSR 
BCS 



R3 

^5000. .Rl 
PC, MSLGET 
6$ 



J SET UP DESIRED S!A!E OF Mr.S!ER RESE! HIT 
(PASS TIME-OUT VALL€ OF S SECONDS. 
tWAI! FOR 5ELF-!ES! COMPLETE. MR CLEAR 
(SKIP ERROR REPORT IF MR CLEARED IN TIME. 



L8 



CZOHVBO DHU-11 KUNC TST PART2 
GLG3AL SUBROUTINE 



MACRO M1200 
- RESETT - 
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SEQ 102 



3735 
3736 

3737 
3758 
3739 
3740 

3741 
3742 
3745 

3744 

3745 
3746 
374.^ 
3748 
3749 
3750 
3751 
3752 
3755 

3754 
3755 
375f 



t ♦ 



016362 
016366 



016374 
016374 
016376 
016400 



016402 
016406 

016410 
016410 

016412 



012701 005320 
012767 012020 



104460 
000241 
000403 



005067 163650 
000261 



004736 
000207 



! - 

4$ 



SET UP ERROR MESSAGE TO REPORT "FATAL ERROR FOUND DURING RESET. TEST ABORTED". 
INDICATE TEST IS TO BE ABORTED BY CLEARING THE CARRY 81^. 

MOV frEM1601.Rl iPASS ERROR MESSAGE TO REPORT. 
165462 MOV ^'ER1603,ERRBLK jPASS ADDRESS OF ERROR HANDLING ROUTINE. 

(REPORT E.RROR "TIME OUT OCCURRED WAITING FOR MASTER RESET TO CLEAR" 

; "TEST ABORTED" 

ERROR I i>>>> ERROR <<<<< 

TRAP CJERROR 
CLC , INDICATE TEST IS TO BE ABORTED. 

BR 60$ jEXIT THIS SUBROUTINE. ABORT TEST INDICATOR. 

'; CLEAR TX AND RX INTERRUPT ENABLE STATUS FLAGS IN lESTAT. 
I EXIT WITH CONTINUE TE*" * INDICATOR SET (IE. CARRY SET). 



6$: 


CLR 
SEC 


60$: 


PASS 




RT3 



lESTAT 



JSR 



PC 



, CLEAR TX AND RX INTERRUPT STATUS FLAGS. 
(INDICATE SUCCESS. CONTINUE TEST, 

(RESTORE GPRS, PASS THE FOLLOWING INTACT: 
PC.QCSP)* (RETURN TO PREGOS SUBRT 

I CARRY BIT: IF CLEAR. INDICATES ABORT TEST, 



CZDHVBO DHU-11 t-'UNC TST PARTS 
GLOBAL SltBROUTINE 
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M8 

PAGE 76 



SEQ 103 



3 758 








3759 








3760 








3761 








3 762 








3763 








3764 








3765 








3766 








3767 








3768 








3769 








3770 








3771 








3772 








3773 








3774 








3775 








3776 


016414 


010046 




3777 


016416 








016416 


104440 






016420 


010046 




3778 


016422 








016422 


012700 


000340 




016426 


104441 




3779 


016430 


042767 


137777 163620 


3780 


016436 


016777 


163614 165562 


3781 


016444 








016444 


012600 






016446 


104441 




3782 


016450 


012600 




3783 


016452 


000207 





.SBTTL GLOBAL SUBROUTINE - RXIEO - 

,* - RECEIVER INTERRUPT DISABLE - 

!• THIS ROUTINE 13 USED TO DISABLE RECEIVER INTERRUPTS IN THE DHUll. 

J* INPiJTS: NONE. 

U OUTPUTS 1 THE RX.INT.ENBL BIT IS CLEARED IN THE OUT CSR . 

J* XESTSi -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

:* ENABLE BITS. 

i* 

J* CALLING SEQUENCE: JSR PC, RXIEO 

!♦ COMMENTS: THE CONTENTS OP THE INDIRECT ADDRESS REGISTER FIELD IN 
J* THE DUT CSR ARE DESTROYED. 

1* SUBORDINATE ROUTINES CALLED: NONE. 



RXIEO: i MOV RO.-CSP) 
GETPRI -CSP) 



SETPRI #PRI07 



BIC #137777, lESTAT 
MOV IESTAT»aCSRA 
SETPRI CSP)* 



MOV 
RTS 



(SP)*.R0 
PC 



(SAVE CONTENTS OF RO ON THE STACK. 

jiAVE PROCESSOR PRIORITY ON STACK. 

TRAP C$GPRI 
MOV RO. -CSP) 

; IGNORE ANY INTERRUPT THAT MAY BE GENERATED. 

MOV «PRI07,R0 
TRAP CJSPRI 

iCLEAR RX.INT.ENBL BIT IN IE5TAT. 

(DISABLE RX INTERRUPTS. 

i ENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

MOV (SP)*.RO 
TRAP C$SPRI 

(RESTORE RO. 



N8 



C7DHVB0 DHU 11 FUNC TST PARTS 
GLOBAL SUBROUTINE 



MACRO M1200 
- RXIEl - 



15-MAR-84 09:28 PAGE 79 



SEQ 104 



?785 
.^786 
3787 
3788 
3789 
5790 
3791 
3792 
3793 
3794 
3795 
3796 
3797 
3798 
3799 
3800 
3801 
3802 
3803 
3804 
3805 
3806 
3807 



.SBTTL GLOBAL SUBROUTINE - RXIEl - 

1* - RECEIVER INTERRUPT ENABLE - 

:♦ THIS ROUTINE IS USED TO ENABLE RECEIVER INTERRUPTS IN THE DHUll. 

i* 

;♦ INPUTS: NONE. 

1* 

.* OUTPUTS: THE RX.INT.ENBL BIT IS SET IN THE OUT CSR. 

:* lESTST -CONTAINS THE UPOATED STATUS OF THE TX AND RX INTERRUPT 

i* ENABLE BITS. 

:* 

J* CALLING SEQUENCE: JSR PC, RXIEl 



THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 
THE DUT CSR ARE DESTROYED. 



I* COMMENTS: 

i* 

;* 

;♦ SUBORDINATE ROUTINES CALLED: NONE. 

- - ********«4>i' ******** ******************************************************** 



016454 052767 000100 163574 RXIEl:: BIS «IT06.IESTAT iSET RX.INT.ENBL BIT IN lESTAF. 

016462 042767 137677 163S66 BIC ^»l37677 . lESTAT jCLEAR ALL OTHEt^ BITS. EXCEPT TX AND RX I.E. 

016470 016777 163562 163530 MOV lESTAT.BCSRA ;ENABLE RX xNTERRUPTS. 

016476 00020? RTS PC 



B9 



C70HVB0 DHL» 11 TUNC TST PART2 
GLOBAL SieROUTINt 



3809 
5810 
3611 
381^ 
5615 
5814 
581?^ 
5eib 
3817 
5618 
3619 
58.''0 
36^1 
3822 
38a5 
3824 
3825 
3826 
3827 
3820 
3829 
3850 
3831 
3852 



3853 
5854 
5855 
5856 
3857 
3856 
3859 
5840 
3841 
3842 
384 5 

3644 



016500 
016500 
016504 
016510 
016514 
016516 
016522 
016524 
016550 
016552 
016536 

016542 
016542 
016544 



004567 
016704 
116724 
00.J204 
042702 
010224 
020427 
105402 
162704 
010467 



0O4756 
000207 



MACRO M1200 15-MAR-84 09t28 PAGE 80 
- SAVBMP - 

.SBTTL GLOBAL SUBROUTINE - SAVBMP - 

• SAVE BMP COOES ROUTINE - 
THIS ROUTINE SAVES THE PARAMETER PASSED IN. ONTO THE BMP CODE QUEUE 
TOGETHER WITH THE NUMBER OF THE CURRENTLY EXECUTING TEST. 



i5EQ 105 



INPUTS t 



OUTPUTS: 



R2 - CONTAINS THE BMP CODE THAT IS TO BE PLACED ON THE QUEUE. 
BMPCOP - CONTAINS ADDRESS OP NEXT LOCATION IN THE BMP QUEUE. 
BMPC06 - LABEL AT BASE Of THE BMP CODE QUEUE. 

BMPCQE - LABEL OF NEXT LOCATION AFTER THE END OF THE BMP QUEUE. 
TSTNUM ■ CONTAINS THE NUMBER OF THE CURRENT TEST. 

BMPCQP - INCREMENTED BY 4. 

THE CONTENTS OF THE BMP CODE QUEUE ARE UPDATED. 



CALLING SEQUENCE: 
COMMENTS! 



JSR 



PC. SAVBMP 



IF THE OVERFLOW OCCURS THEN THE LAST LOCATION WILL BE 
OVERWRITTEN BY ANY SUBSEQUENT ATTEMPTS TO UPDATE THE QUEUE. 



SUBORDINATE ROUTINES CALLED: NONE, 



165554 
165"'00 
163540 

177400 

002612 

000004 
163646 



SAVBMP J J SAVE 



MOV 
MOVB 
INC 
BIC 

MOV 
CMP 
BLO 
SUB 
MOV 



21: 

6011 



JSR 
BMPCQP. R4 
TSTNUM, (R4)* 
R4 

•177400. R2 
R2,(R4)* 
R4.*BMPCQE 
21 

«4.R4 
R4, BMPCQP 



I SAVE CONTENTS OF GPRS RO THRU R5. 

R5,PREG05 iCALL REGISTER SAVE SU6RT. 

iGET THE POINTER TO THE NEXT LOCATION IN QUEUE. 

I SAVE THE CURRENT TEST NUTSER ON THE QUEUE. 

I INCREMENT THE POINTER TO GIVE AN EVEN ADDRESS. 

iCLEAR THE UNWANTED BITS FROM THE BMP CODE. 

I SAVE THE BMP CODE ON THE QUEUE. 

iCHECK IF OVERFLOW WILL OCCUR THE NEXT TIME. 

iGO SAVE THE POINTER IF WE WILL NOT OVERFLOW. 

iRESET THE POINTER TO THE LAST LOCATION IN QUE. 

I SAVE THE POINTER. 



PASS 
RTS 



PC 



JSR 



(RtSTORt GPRb. 
PC.WCSP)* 



(RETURN TO PRL005 iiUBRT. 



Si^BBKrsBBKoMi^^ 



C TST PART2 MA 



5i9pW 



200 



C9 
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SF.Q 106 



3M4fe 
584 7 
3848 
5849 
58^0 
38^jI 
585.-^ 
5855 
3854 
3855 
3856 
3857 
3858 
3859 
3860 
3861 
3862 
3663 
3864 
3865 

3866 
36167 
3868 
3869 
3870 
3871 
3872 
3873 
3874 
3875 

3876 



016546 
016546 
016552 
016556 
016560 
016564 
016570 
016574 
016600 
016604 

016610 
016610 
016612 



004567 
004767 
010005 
012700 
004767 
012700 
004767 
012704 
004767 



004756 

000207 



.SBTTL GLOBAL SUBROUTINE - SETPAR 

. ^ - SET TX AND CONTROL PARAMETERS - 

♦ THIS SUROUTINE IS USED IN THE FIHAVL.TST. 

♦ IT INITIALISES THE SELECTED LINE TO THE FOLLOUING STATE: 

♦ INTERNAL LOOPBACK. lAUTO ENABLED, LPR!38.4l<, 8 BITS/CHAR, 2 STOP. 

♦ ODD PARITY, 
* 

♦ ir>*PUTS: Rl - CONTAINS NUHBER OF THE LINE TO BE INITIALISED. 

♦ OUTPUTS: LNCTRL AND LPR REGISTERS FOR THE SELECTED LINE ARE OESTROTED. 

♦ CALLING SEQUe.NCEi JSR PC. SETPAR 

♦ COMMENTS: 

♦ SUBORDINATE ROUTINES CALLED: DELAY .WTWLNC.WTWLPR. 



165506 
176072 

0O0206 
000762 
177670 
001002 
000012 
175452 



SETPAR:: SAVE 

JSR 
MOV 
MOV 

JSR 
MOV 

JSR 
MOV 

JSR 



JSR 
PC.LINBIT 
R0.R5 
♦206, RO 
PC.WTWLNC 
0177670. RO 
PC.WTWLPR 
010. ,R4 
PC. DELAY 



(SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 iCALL REGISTER SAVE SUBRT. 

iGET A BIT MAP FOR THIS LINE. 

iCOPY THE LINE BIT MAP. 

iPASS INTERNAL LOPBCK. ENABLE RX AND lAuTO. 

lINITILAISE THE LINE CONTROL REGISTER. 

iPASS THE LPR CONTENTS. 

iSET THE LPR CONTENTS TO 38. 4K BAUD. 

iPASS DELAY TIME OF 10 MILLI SECONDS. 

iWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 



60$: 



PASS 
RTS 



PC 



JSR 



iRESTORE GPRS* 
PC.S(3P)» 



iRETURN TO PREG05 SUBRT. 



efBg)(rsBeyo6hf^^ 



NC TST PART2 MA 



Ws^h 



200 15-MAR-84 09:23 



DO 

PAGE 62 



SBQ 107 



36 78 
3879 
3880 
3681 
3882 
3863 
3884 
3885 
3886 
3887 
3868 
3889 
3890 
3691 
3892 
3893 
3894 
5895 
3896 
3897 
3898 

3899 

3900 
3901 
3902 
3903 
3904 
3905 
3906 
3907 
3908 
3909 
3910 
3911 
3912 
3913 
3914 
3915 
3916 
3917 

3916 



016614 
016614 
016620 
016624 



016634 
016640 
016642 
016646 
016650 
016652 
016656 
016660 
016664 

016666 
016666 
016670 



004567 
012704 
004767 



012703 
005301 
016704 
010124 
010324 
020467 
103774 
032701 
001365 



004 736 
000207 



.SBTTL GLOBAL SUBROUTINE - SKPST5 - 

- SKIP SELriEST ROUTINE - 
THIS SUBROUTINE IS USED TO SKIP THE SELFTEST AFTER A OUT RESET HAS BEEN 
INITIATED. IT MUST BE ENTERED I1ME0IATELY AFTER SETTING THE OUT MASTER 
RESET ROUTINE OR AFTER THE EXECUTION OF A BUS RESET (BECAUSE OF TIMING 
CONSIDERATIONS). 



INPUTS: 



CSRA - CONTAINS ADDRESS OF THE OUT CSR, 

TXBFCA - CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 



OUTPUTS: SKIP SELFTEST CODES ARE WRITTEN TO THE DUT REGISTERS. 

CALLING SEQUENCE: JSR PC.5KPSTS 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: DELAY. 



165240 

000012 
175432 



SKPSTS:: SAVE 

MOV 
JSR 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PREG05 (CALL REGISTER SAVE SUBRT 
#10., R4 (PASS DELAY VALUE OF 10 MILLI -SECONDS. 
PC. DELAY lOELAY FOR 10 MILLI -SECONDS. 



I • 



I WRITE SKIP SELF -TEST CODE (52525) TO ALL THE INDEXED DUT REGISTERS. 



016630 012701 000060 



i - 



052525 
163360 

163366 
000017 



MOV ♦NUMLNSJBITOS.Rl iFORM INO.ADR.REG FIELD (PLUS M.R. BIT) WORD 
I THE ABOVE INCLUSION OF THE M.R. BIT IS NECESSARY BECAUSE OF THE 
I LACK OF A M.R. BIT WRITE LOCK-OUT ON THE DHU-11. 

INITIALISE THF. SKIP SELF-TEST CODE. 

(SELECT THE NEXT SET OF DEVICE REGISTERS. 

(GET THE ADDRESS OF THE CSR OF THE DUT. 

(SELECT A BANK OF DUT REGISTERS. 

(WRITE THE CODE TO A OUT REGISTER. 

(COMPARE POINTER WITH LAST REGISTER ADDRESS. 

(LOOP IF NOT ALL REGS DONE IN THIS BANK. 

(TEST FOR INO.ADR.REG FIELD DECREMENTED TO 0. 

(LOOP UNTIL ALL REGISTERS CONTAIN THE CODE. 





MOV 


♦52525, R3 


^t: 


DEC 


Rl 




MOV 


CSRA.R4 




MOV 


R1.(R4). 


6i: 


MOV 


R3.CR4)* 




CMP 


R4. TXBFCA 




8L0 


61 




BIT 


017. Rl 




BNE 


4$ 


60$: 


PASS 


1 




RTS 


PC 



(RESTORE GPRS, 
PC,S(SP)* 



;RETURN TO PREG05 SUBRT 



E9 



CZOHVBO DHU-U TUNC I'ST PARTS 
GLOBAL SUBROUTINE 



S^?0 
3921 

392J 
3924 
3925 
3926 
3927 
3928 
3929 
3950 
3931 
3932 
3933 
3934 
3955 
3936 
3957 
3938 
3939 
3940 
3941 
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TS) 



SEQ 108 



.SBTTL GLOBAL SUBROUTINE - tSABRT - 

* 4i4>*** ************** *****«**.*4t***<ti*«**«**««4>4.4>*4t*4h4>«««*4i««4i«**«*««**4i*«4i4««* 

- TEST ABORT ROUTINE - 
THIS SUBROUTINE IS USED WHEN A NON-TEST RELATED ERROR HAS BEEN FOUND 
DURING THE EXECUTION OF THC CURRENT TEST, 

IT IS USFO TO INFORM THE OPERATOR THAT THE CURRENT TEST HAS BEEN 
ABORTED. 



INPUTS: 



ERRMSG - CONTAINS THE NAME OF THE CURRENT TEST. 

ERRN8R - CONTAINS THE CORRECT ERROR NUMBER . 

THE REMAINDER OF THE ERRTBL IS CORilECTLY INITIALISED. 



OUTPUTS: MESSAGES ARE REPORTED TO THE OPERATOR. 

CALLING SEQUENCE: JSR PC, TSABRT 

COMMENTS; 

SUBORDINATE ROUTINES CALLED: ER1603. 



3942 
3943 
3944 

3945 

3946 



394 7 
3948 

3949 



016672 
016672 
016676 
016702 
016710 
016710 
016712 
016714 
016717 
016722 
016725 
016730 
016733 
016736 
016741 
016744 
016747 
016752 
016755 
016760 
016763 
016/66 
016771 
016774 
016777 

017000 
017000 
017002 



004567 
012701 
012767 

). 04460 
000432 
040 
116 
105 
124 
040 
123 
105 
11, 
106 
116 
104 
111 
040 
123 
105 
103 
111 
000 



004 756 
000207 



165162 
016714 
012020 



116 

055 
114 
105 
124 
124 
122 
122 
117 
104 
125 
116 
124 
124 
150 
125 
117 



165146 



117 

122 

10) 

104 

105 

040 

122 

040 

125 

040 

122 

107 

105 

040 

105 

124 

116 



TSABRT:: SAVE 

MOV 

MOV 

ERROR 



JSR 
02$. Rl 

0ER1603,ERRBLK 



60$ 



2$: 



J SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 iCALL REGISTER SAVE SU6RT. 

iPASS ADDRESS OF FIRST MESSAGE TO BE REPORTED. 
I SET -UP THE ERROR REPORTING ROUTINE. 
t >>>>> ERROR <<<<<. 

TRAP CJERROR 

I 



BR 

.ASCIZ / NON-RELATEO TEST ERROR FOUND DURING TEST EXECUTION/ 



.EVEN 
60*: 



PASS 
RTS 



PC 



tRFSTORE GPRS. 
JSR PC.SCSP)* 



iRETURN TO PREG05 SUBRT, 



F9 



CZDHVBO DHU U f-UNC TST PARTa 
GLOBAL SltBROUTINE 



MACRO Mi;?00 15-MAR-84 09; 28 PAGE 84 
- TXDATP - 



SEQ 109 



3951 
3952 
3955 
3954 
3955 
3956 
3957 

3958 
3959 
3960 
3961 
3962 
3963 
3964 
3965 
3966 
3967 
3966 
3969 
3970 
3971 

3972 
3973 
3974 
3975 



017004 

017004 004567 165050 

017010 010003 

017012 012702 002650 

017016 004767 175356 

017022 

017022 004736 



.SB! L. GLOBAL SUBROUTINE - TXDATP - 

t* - TRANSMIT DATA PATTERN - 

i* THIS SUBROUTINE IS UScD IN THE FIHAVL.TST. 

:* IT TRANSMITS A SPECIFIED NUMBER OF DATA BYTES ON THE SPECIFIED LINE. 

»♦ 

;♦ INPUTS: RO - CONTAINS THE NUMBER OF DATA BYTES TO TX. 

t* Rl - CONTAINS LINE NUMB ON WHICH TRANSMISSION IS TO TAKE PLACE. 

;» BUFBAS TO BUFMID CONTAINS A 256 BYTE DATA PATTERN. 

!♦ OUTPUTS: DATA IS SENT OUT ON THE SPECIFIED LINE. 

J* CARRY SET - TX SUCCESSFUL. 

• * 

I* CALLING SEQUENCE: TXDATP 

J* 

;♦ COMMENTS: 

I* 

I* SUBORDINATE ROUTINES CALLED: DODMA. 



TXDATP:: SAVE 



60*! 





JSR 


MOV 


R0,R3 


MOV 


*BUFBAS,R2 


JSR 


PC , DODMA 


PASS 





3976 017024 000207 



RTS 



PC 



JSR 



I SAVE CONTENTS OF GPRS RO THRU R5. 

R5,PREG05 jCALL REGISTER SAVE SUHRT. 

iPASS THE NUMBER OF CHARS TO TX. 

;PASS THE START OF THE. DATA PATTERN TO TX. 

(TRANSMIT THE DATA PATTERN. 

I RESTORE GPRS. 

PC.aCSP)* {RETURN TO PRtGOS SIBRT. 



G9 



CZOHVfiO DHU-11 FUNC TST PART2 
GLOBAL SLeROUTINE 



3978 
3979 
3900 
39G1 
3982 
3983 
3984 
3985 
3986 
3987 
3988 
3989 
3990 
3991 
3992 
3993 
3994 
3995 
3996 
3997 
3998 
3999 
4000 
4001 



MACRO M1200 
- TXDSBL - 



15-MAR-84 09:28 PAGE 65 



SEQ 110 



4002 
4003 
4004 
4005 
4006 
4007 
4008 
4009 
4010 
4011 
4012 
4013 
4014 
4015 
4016 
4017 
4018 
4019 
4020 
4021 
4022 
4023 
4024 
4025 
4026 
4027 
4028 



4029 
4030 



017026 
017026 
017032 
017034 
017040 
017044 
017046 
017052 
017056 



017060 
017064 
017066 
017070 



017072 
017074 
017076 
'"17102 
0ia04 
017106 
017110 

017112 
017U2 
017116 



004567 
010500 
012701 
016702 
005202 
012703 
016704 
005005 



010477 
105712 
100001 
050105 



030100 
001402 
142712 
005204 
006301 
005303 
001363 



010566 
004736 



.SBTTL GLOBAL SUBROUTINE - TXDSBL - 

♦ - TRANSMITTER DISABLE - 

THIS SUBROUTINE IS USED TO DISABLE TRANSMISSION ON SELECTED LINES BY. 
CLEARING THE ASSOCIATED TX, ENABLE BIT ON THE DUT. 



INPUTS: 



OUTPUTS: 



R5 - BIT'S SET CORRESPOND TO LINES ON WHICH TO CLEAR TX. ENABLE. 
CSRA - CONTAINS THE ADDRESS OF THE OUT CSR. 

lESTAT - CONTAINS THE STATE OF TXIE ANO RXIE BITS IN THE CSR. 
NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
TXAD2A ■ CONTAINS THE ADDRESS OF THE TBUFFA02 REGISTER, 

R5 - BIT'S SE* INDICATE THE INITIAL STATES OF ALL TX.ENBLE BITS 

TBUFFAD2 - THE STATE OF THE TX.ENBLE BIT MAY BE ALTERED. 

THE CONTENTS OF THE IND.ADD.REG FIELD IN THE CSR ARE DESTROYED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, TXDSBL 



SUBORDINATE ROUTINES CALLED: NONE. 



165026 

000001 
163176 

000020 
163200 



163142 



JSR 
R5,R0 
♦BITO.Rl 
TXAD2A.R2 
R2 

*NUMLNS,R3 
IESrAT.R4 
R5 



I SAVE COfnENTS OF GPRS RO THRU R5. 
R5,PREG05 ;CALL REGISTER SAVE SU8RT. 
;COPY BIT MAP OF LINES TO DISABLE TRANSMISSION. 
I INITIALIZE THE SELECTED LINE BIT MASK. 
I GET THE ADDRESS OF THE TBLFFAD2 REGISTER. 
(GET THE ADDRESS OF THE MSBYTE OF TBUFFAD2 REG. 
(GET MAXIMUM LINE NUMBER PLUS ONE. 
(GET THE STATES OF THE INT ENABLE BITS. 
(LOG POSSIBLE TX DI5A0LED ON ALL LINES. 



TXDSBL:: SAVE 

MOV 
MOV 
MOV 
INC 
MOV 
MOV 
CLR 

I SELECT EVERY LINE IN TURN. AND LOG THE STATE OF EACH TX. ENABLE BIT. 

J - 

2$: 



MOV 
TSTB 
BPL 
BIS 



R4.SCSRA 
(R2) 
4S 
R1.R5 



(WRITE TO DUT CSR TO SELECT LINE REGISTERS. 
tCHECK STATE OF TX. ENABLE BIT ON SELECTED LINE. 
iSKTP NEXT INSTRUCTION IF TX. ENABLE CLEAR. 
iLOG TX ENABLE BIT SET FOR SELECTED LINE, 



l' CLEAR TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX DISABLE 
i LINE BIT MAP. 



000200 



000014 



t - 
4$: 



6$: 



60$: 



017120 000207 



BIT 

BEQ 
OICB 
INC 
ASL 
DEC 

BNE 

PASS 



RTS 



Rl.RO 

6t 

*firT7.(R2) 

R4 

HI 

R3 

2» 



tCHECK STATE OF DISABLE LINE BIT MAP. 
jBRANCH IF THIS LINE TO REMAIN UNALTERED. 
(CLEAR TX. ENABLE BIT ON SELECTED LINE. 
jPREPARE TO SELECT REGISTERS FOR NEXT LINE 
(SHIFT BIT MAP FOR NEXT LINE. 
(DECREMENT LINE NUMBER. 
(LOOP TO CHECK NEXT LINE. 



R5 



PC 



MOV 
JSR 



(RESTORE GPRS, EXCEPT 

R5.R5SL0T(SP) 

PC.aCSP)' 

iR5 - PRfVlOUS STATES 



(PUT R5 IN STACK SLOT. 
(RETURN TO PREG05 SL'BRT 
OF ALL TX. ENABLE BITS. 



-19 



CZOHVBO DHU- 11 fUNC TST PART2 
GLOBAL >ieROUTINE 



40?^ 
4033 

4054 
4035 
4036 
4037 
4036 
4039 
4040 
4041 
4042 
4043 
4044 
404S 
4046 
404 7 

4048 
4049 
4050 
4051 
4052 
4053 
4054 
4055 



4056 
4057 
4058 
4059 
4060 
4061 
4062 
4063 
4064 
4065 
4066 
4067 
4068 
4069 
4070 
4071 
4072 
4075 
4074 
4075 
4076 
4077 
40 78 
4079 
4080 
4081 
4082 



4083 
4084 
4085 



017122 
017122 
017126 
017130 
017134 
017140 
017142 
017146 
017152 



017154 
017160 
0171C2 
017164 



017166 
017170 
017172 
017176 
017200 
017202 
017204 

017206 
017206 
017212 



004567 
010500 
012701 
016702 
005202 
012703 
016704 
005005 



010477 
105712 
100401 
050105 



MACRO M1200 
- TXEN8L - 

.SB 

i ♦♦ 

i* 

;♦ 

;♦ 

»♦ 

I* 

I* 

J* 

t* 

;♦ 

t* 

t* 

;* 

;* 

;♦ 

t* 

i* 

;♦ 

i* 

;♦ 



164732 

000001 
163102 

000020 
163104 



163046 



050100 

001402 

152712 000200 

005204 

006501 

005303 

001563 



010566 000014 
004736 



15 -MAR -84 09:28 PAGE 86 

TTL GLOBAL SUBROUTINE - TXEN8L - 

- TRANSMITTER ENABLE - 
THIS SUBROUTINE IS USED TO ENABLE TRANSMISSION ON SELECTED LINES BY 
SETTING THE ASSOCIATED TX. ENABLE BIT ON THE DUT . 



SEQ 111 



INPUTS: 



OUTPUTS: 



R5 - BIT'S SET CORRESPOND TO LINES ON WHICH TO SET TX. ENABLE. 
CSRA - CONTAINS THE ADDRESS OF THE DUT CSR. 

lESTAT - CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
NUMLNS - EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
TXAD2A - CONTAINS THE ADDRESS OF THE TBUFFA02 REGISTER. 

R5 - BIT'S SET INDICATE PREVIOUSLY DISABLED LINES. 

TBUFFAD2 - THE STATE OF THE TX.EN8LE BIT MAY BE ALTERED. 

THE CONTENTS OF THE INO.ADD.REG FIELD IN THE CSR ARE DESTROYED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC , TXENBL 



SUBORDINATE ROUTINES CALLED: NONE. 
****************&************************•*************•******************* 



JSR 
R5.R0 
oeiTO.Rl 
TXAD2A.R2 
R2 

♦NUHLNS.R3 
IESTAT,R4 
R5 



J SAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 (CALL REGISTER SAVE SUBRT. 

iCOPY BIT MAP OF' LINES TO ENABLE. 

I INITIALIZE THE SELECTED LINE BIT MASK. 

iGET THE ADDRESS OF THE TBUFFAD2 REGISTER. 

I GET THE ADDRESS OF THE MSBYTE OF TBUFFA02 

jGET MAXIMUM LINE NUMBER. 

iGET THE STATES OF THE INT ENABLE BITS. 

iCLEAR TX. ENABLE BIT LOG OF DISABLED LINES. 



TXENBL: J SAVE 

MOV 
MOV 
MOV 
INC 
MOV 
MOV 
CLR 

J SELECT EVERY LINE IN TURN, AND LOG ANY TX.ENBLE BIT THAT IS CLEAR. 

I - 

2$: 



REG. 



MOV 
TSTB 
BMI 
BIS 



R4.9CSRA 
(R2) 
4$ 
R1,R5 



(WRITE TO OUT CSR TO SELECT LINE REGISTERS. 
(CHECK STATE OF TX. ENABLE BIT ON SELECTED LINE. 
(SKIP NEXT INSTRUCTION IF TX. ENABLE SET. 
(LOG TX ENABLE BIT CLEAR FOR SELECTED LINE. 



017214 000207 



SET TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX ENABLE 
LINE BIT MAP. 

(CHECK STATE OF TX. ENABLE LINE BIT MAP. 
(BRANCH IF THIS LINE TO REMAIN UNALTERED. 
(ENABLE TRANSMISSION ON SELECTED LINE. 
(PREPARE TO SELECT REGISTERS FOR NEXT LINE. 
(SHIFT BIT MAP FOR NEXT LINE. 
(DECREMENT LINE NUMBER. 
(LOOP TO CHECK NEXT LINE. 

(RESTORE GPRS, EXCEPT 

R5»R5SL0T(5P) (PUT R5 IN STACK SLO^. 

PC.O(SP)» (RETURN TO PREG05 SUBRT, 

iR5 - LINE BIT MAP CORRESPONDING TO THE 

J PREVIOUS LINES THAT WERE DISABLED. 



4$: 


BIT 


Rl.RO 




BEQ 


6t 




BISB 


WIT7,(R2) 


6*: 


INC 


R4 




ASL 


ttl 




DEC 


R3 




BNF 


2$ 


601 J 


PASS 


R5 

MOV 
JSR 



RTS 



PC 



CZDHVBO DHU 11 TUNC TST PART2 
GLOBAL S16R0UTINE 



406 7 
4088 

4089 
40^ 
4091 
409^ 
4095 
4094 
4095 
4096 
4097 
4098 
4099 
4100 
4101 
410? 
4103 
4104 
4105 
4106 



4107 



4108 
4109 
4110 



4111 
4112 



017216 
017220 
017220 
017222 
017224 
017224 
017230 
017232 
017240 
017246 
017246 
017250 
017252 
017254 



MACRO M1200 
- TXIEO - 



15-MAR-84 09:28 



19 

PAGE 87 



SEQ 112 



010046 

104440 
010046 

012700 000540 
104441 

042767 177677 

016777 163012 

012600 
104441 
012600 
000207 



.SBTTL GLOBAL SUBROUTINE ■ TXIEO - 

1* - TRANSMITTER INTERRUPT DISABLE - 

1* THIS ROUTINE 13 USED TO DISABLE TRANSMITTER INTERRUPTS IN THE DHUll. 

J* 

J* INPUTS: NONE. 



THE TX.INT.ENBL BIT IS CLEARED IN THE OUT CSR. 

lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

ENABLE BITS. 



JSR 



PC. TXIEO 



I* OUTPUTS: 

;* 

;* 

;♦ 

J* CALLING SEQUENCE: 

;♦ 

:* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 
I* THE DUT CSR ARE DESTROYED. 

J* 

;* SUBORDINATE ROUTINES CALLED: NONE. 

• - - «4.«4L«*«*«*****«*****4t4i4i4i44i*4i*************************4<*********** ********** 

TXIEO J ; MOV 

GETPRI 



RO.-(SP) 
-(SP) 



165016 
162760 



SETPRI 0PRI07 



BIC #177677, lESTAT 
MOV lESTAT.SCSRA 
SETPRI (SP)» 



MOV 
RTS 



(SP)*.R0 
PC 



iSAVE CONTENTS OF RO ON THE STACK. 

I SAVE CURRENT PROCESSOR PRIORITY ON THE STACK. 

TRAP CJGPRI 

MOV RO. -CSP) 

; IGNORE ANY INTERRUPTS THAT MAY BE GENERATED. 

MOV *PRI07,R0 

TRAP CJSPRI 

iCLEAR TX.INT.ENBL BIT IN lESTAT. 

;DISABLE TX INTERRUPTS. 

(ENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

MOV (SP)*.RO 

TRAP C$SPRI 

(RESTORE RO. 



J 9 



C7DHVB0 OW n TLtNC TST PART2 
GLOBAL SlJBROUriNE 

4114 
4115 
•■Ulb 
'U I 7 
4il6 
4119 
41^0 
4121 

4125 
4124 
4125 
4126 
412 7 
4123 
4129 
4150 
4131 
4152 
4133 
4154 
4155 
4136 



MACRO M1200 
- TXIEl - 



15 -MAR -64 09:28 PAGE 88 



SEQ 113 



017256 052767 040000 

017264 042767 137677 

017272 016777 162760 

017300 000207 



.SBTTL GLOBAL SUBROUTINE - TXIEl - 

;• - TRANSMITTER INTERRUPT ENABLE 

t* THIS ROUTINE 13 USED TO ENABLE TRANSMITTER INTERRUPTS IN THE DHUll. 

;♦ 

J* INPUTS: NONE. 

t* OUTPUTS.' THE TX.INT.ENBL BIT IS SET IN THE OUT CSR. 

i* lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 

i» ENABLE BITS. 

;♦ 

i* CALLING SEQUENCE: JSR PC, TXIEl 

J* 

J* COMMENTS: THE CONTENTS OT THE INDIRECT ADDRESS REGISTER FIELD IN 

• THE DUT CSR ARE DESTROYED. 
* 

♦ SUBORDINATE ROUTINES CALLED: NONE. 



162772 TXIEl;; BIS 
162764 BIC 

162726 MOV 

RTS 



*eiT14.IESTAT jSET TX.INT.ENBL BIT IN lESTAT. 

*137677.IESTAT tCLEAR ALL BITS EXCEPT TX RX I.E BITS. 

lESTAT.SCSRA jENABLE TX INTERRUPTS. 
PC 



I<9 



CZOHVBO OHU U F-UNC TbT PART2 
GLOBAL S1.6R0UTINE 



4158 






4139 






4140 






4141 






414? 






4143 






4144 






4145 






4146 






4147 






4148 






4149 






4150 






4151 






4152 






4155 






4154 






4155 






4156 






4157 






4158 






4159 






4160 






4161 


017302 






017302 


004567 164552 


4162 






4163 






4164 






4165 


017306 


010204 


4166 


017310 


160104 


4167 


017312 


103403 


4168 


017314 


012701 177777 


4169 


017320 


000442 


4170 






4171 






4172 






4173 


017322 


005004 


4174 


017324 


000241 


4175 


017326 


006001 


4176 


017330 


006004 


4177 


017332 


012700 000020 


4178 






4179 






4180 






4181 


017356 


010246 


4182 


017340 


010346 


4183 


017342 


160403 


4184 


017344 


005602 


4185 


017346 


103402 


4186 


017350 


160102 


4187 


017352 


103003 


4188 






4189 






4190 






4191 






4192 


017354 


012605 


4193 


017356 


012602 



MACRO M1200 15-MAR-84 09:28 PAGE 89 
- UNSDIV - 

.SBTTL GLOBAL SUBROUTINE - UNSDIV - 

I* - UNSIGNED DIVIDE ROUTINE - 

J* THIS S16R0UTINE IS USED TO DIVIDE A 32 BIT UNSIGNED DIVIDEND BY A 

J* 16 BIT UNSIGNED DIVISOR GIVING A 16 BIT QUOTIENT. ALL NUMBERS ARE 

;♦ C0NSIDEr-*E0 TO BE UNSIGNED. A SUCCESS FLAG IS NOT SET ON RETURN IF 

I* THE QUOTIENT WAS TOO BIG TO BE CONTAINED IN 16 BITS. 

;* 

J* INPUTS: Rl ~ THE DIVISOR, UNSIGNED, 16 BITS. 

;♦ R2 - MOST SIGNIFICANT WORD OF THE DIVIDEND. UNSIGNED, 16 BITS. 

;• ?»3 - LEAST SIGNIFICANT WORD OF THE DIVIDEND. UNSIGNED, 16 BITS. 

;* 

;* OUTPUTS: Rl - QUOTIENT, UNSIGNED, 16 BITS C 177777 IF OVERFLOW"). 

;• CARRY - SUCCESS FLAG, SET IF COMPLETE QUOTIENT FITS IN 16 BITS. 

;* 

I* CALLING SEQUENCE: JSH PC, UNSDIV 

;* 

;♦ COMMENTS: IF THE DIVISOR IS THE QUOTIENT IS RETURNED AS ALL ONES 

;* C 177777) AND THE CARRY IS CLEAR REGARDLESS OF THE DIVIDEND. 

I* 

i* SIJBORDINATE ROUTINES CALLED: NONE. 



SEQ 114 



UNSDIV:: SAVE 



;SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5,PREG05 iCALL REGISTER SAVE SUBRT. 



t CHECK FOR QUOTIENT GREATER THAN 16 BITS CONDITION. 



iGET MSU OF DIVIDEND FOR SUBTRACT. 

i SUBTRACT DIVISOR FROM MSW OF DIVIDEND. 

I IF IT DIDN'T GO, WE HAVE QUOTIENT < 16 BITS. 

;SET QUOTIENT TO ALL ONES C177777), 

;EXIT WITH CARRY CLEAR, 



i CLEAR THE LSW OF THE DIVISOR, 

1 CLEAR CARRY FOR THE SHIFT OF THE DIVISOR. 

( DIVISOR BY 

; aCUNSIGNED) 

I SET UP INITIAL SHIFT COUNT TO 16. 



J SAVE MSWORD OF DIVIDEND. 

(SAVE LSWORD OF DIVIDEND. 

iLSWORD DIVIDEND - LSWORD OF DIVISOR. 

i MSWORD DIVIDEND - BORROW . 

ilF BORROW FROM BORROW SUBTRACT, IT DIDN'T GO. 

iMSWORD DIVIDEND - MSWORD OF DIVISOR. 

lIF NO BORROW, IT WENT, CARRY IS CLEAR. 

IT DIDN'T GO, SO WE SHIFT A 1 INTO THE QUOTIENT (COMPLEMENTED LATER). 
CARRY IS SET. 





MOV 


n2,R4 




SUB 


Rl,R4 




BCS 


2i 




MOV 


*-l,Rl 




BR 


60$ 


; SET 


UP COUNTERS AND VA 


2$: 


CLR 
CLC 


R4 




ROR 


Rl 




ROR 


R4 




MOV 


016. .RO 


t ♦ 

; THE 


SUBTRACT 


AND SHIFT 


1 - 

4$: 


MOV 


R2, (SP) 




MOV 


R3, CSP) 




SUB 


R4.R3 




SBC 


R2 




BCS 


6( 




sue 


R1.R2 




BCC 


Qi 



6$: 



I - 



MOV 
MOV 



(SP)»,R3 
(SP)*,R2 



jRESTORE LSWORD OF DIVIDEND. 
iRESTORE MSWORD OF DIVIDEND. 



CZDHVBO OHU-1.1 FUNC TST PARTS 
GLOBAL ?iUeROUTINE 



4194 

4195 

4196 

4197 

4198 

4199 

4200 

4201 

4202 

4203 

4204 

4205 

4206 

4207 

4206 

4209 

4210 

4211 

4212 

4215 

4214 

4215 

4216 

4217 

4218 

4219 

4220 

4221 

4222 

4223 

4224 

4225 

4226 

4227 

4228 

4229 

4230 



4231 
4232 



017360 000401 



017362 012626 



017364 
017366 
017370 
017372 
017374 
017376 
017400 



017402 
017404 
017406 
017410 
017412 



017414 
017416 
017420 



017422 
017424 

017426 
017426 
017432 



006105 
000241 
006001 
006004 
005300 
001357 
005105 



000241 
006103 
103402 
160403 
103403 



005205 
001001 
005305 



010501 
000261 



MACRO M1200 
- UNSDIV - 
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L9 

PAGE 89-1 



SEQ 115 



BR 



10$ 



;G0T0 SHIFT 1 INTO THE QUOTIENT. 



1 ♦ 



IT WENT, SO WE RESTORE THE STACK AND SHIFT A INTO QUOTIENT (WILL 5c 
» COMPLEMENTED LATER). CARRY TS CLEAR. 



8$ 



10$ 



t 



MOV 



CSP)».CSP)* 



iPOP THE SAVED DIVIDEND OFF OF THE ST-'^JK. 



SHIFT THE RESULT OF THE SUBTRACT ATTEMPT INTO THE QUOTIENT SHIFT REG. 



\ - 



ROL 
CLC 
ROR 
ROR 
DEC 
BNE 
COM 



R5 

Rl 
R4 
RO 
4$ 
R5 



J SHIFT NEXT BIT INTO THE INVERTED QUOTIENT. 

I DIVIDE THE 

i DEVISOR BY 

I 2 (UNSIGNED). 

(COUNT THIS SHIFT AND SUBTRACT. 

I LOOP FOR ANOTHER SHIFT € SUB IF NOT DONE. 

iGET QUOTIENT FROM INVERTED QUOTIENT. 



NOW WE EITHER ROUND UP OR LEAVE QUOTIENT ALONE. 



CLC 
ROL 
BCS 

sue 

BCS 



R3 
12$ 
R4.R3 
14$ 



I CLEAR THE CARRY FOR THE SHIFT OF THE DIVIDEND. 
i MULTIPLY LSWORD OF DIVIDEND BY 2. MSWORD IS 0. 
I IF CARRY FROM SHIFT. ROUND UP. 
(SUBTRACT DIVISOR FROM DIVIDEND. 
[IF BORROW. DON'T ROUND UP. 



ROUND UP. EXTRA SUBTRACT WENT. 
12$: 



INC 
BNE 

DEC 



R5 

14$ 

R5 



J INCREMENT THE QUOTIENT BY ONE. 

tIF NO OVERFLOW. WE LEAVE THE ROUND UP. 

iDON'T LET ROUNDING CAUSE OVERFLOW. 



J ALL DONE. PASS QUOTIENT AND EXIT. 

14$: 



010166 000004 
004736 



60$: 



017434 000207 



MOV 
SEC 

PASS 



RTS 



R5,R1 iPASS QUOTIENT BACK IN Rl. 

; INDICATE NO OVERFl.OW. 

Rl jRESTORE GPRS, LEAVE THE FOLLOWING INTACT: 

MOV Rl.RlSLOKSP) iPUT Rl IN STACK SLOT. 

JSR PC,3(SPV {RETURN TO PREG03 SUBRT. 

iRl - 16 en, UNSIGNED QUOTIENT. 

PC J CARRY - SET INDICATES NO OVERFLOW (SUCCESS), 



;ZDHVBO DHU-11 F"UNC TST PART2 
iLOBAL SUBROUTINE 



4254 
4235 
4236 
4237 
4238 
4239 
4240 
4241 
4242 
4243 
4244 
4245 
4246 
424 7 
4248 
4249 
4250 
4251 
4232 
4253 
4254 
4255 
4256 
4257 
4258 
4259 
4260 
4261 
4262 



MACRO M1200 
- WAIBIS - 
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PAGE 90 



SEQ 116 



SBTTL GLOBAL SUBROUTINE - UAIBI3 - 

*. > 4>4i j^*«4l A* ***4> 4i***4i4>*** A* ******* ***4>4>*4i**** ******* A K*** A**** A*** ******* ****** 

♦ - WAIT FOR BIT SET ROUTINE - 

♦ THIS SUBROUTINE WAITS FOR THE SPECIFIED BIT TO BECOME SET. IF THE 

♦ SPECIFIED BIT GOES TO A SET STATE WITHIN THE SPECIFIED TIME-OUT 

♦ PERIOD A SUCCESS INDICATION IS RETURNED BY THIS ROUTINt. 

♦ THE LAST VALUE WHICH IS READ LOOKING FOR THE CONDITION IS RETURNED TO 

♦ ALLOW THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS. 
* 

RI - TIME-OUT VALUE AND BIT NUMBER INDICATION: 

BITS 15 THRU 12 ^ NUMBER OF BIT TO TEST (RANGE THRU 15). 
BITS 11 THRU - TIME-OUT VALUE IN MXLLI -SECONDS (4095 MAX). 

R2 - ADDRESS OF WORD CONTAINING THE BIT TO TEST. 

MSLCNT. 



R2 - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 
CARRY - SUCCESS FLAG (CARRY SET IF BIT SET BEFORE TIME-OUT). 



* INPUTS: 

* 
* 

4 

* 
* 

* OUTPUTS: 

* 
* 

* CALLING SEQUENCE: 

* 
* 
* 
* 

* COMMENTS: 

* 

* SUBORDINATE ROUTINES CALLED: MSLGET. 

. -. *************************************************************************** 



MOV 

MOV 
JSR 



*1 30040, Rl 

«LABEL.R2 
PC, WAIBIS 



(PASS 
t 32 

I TEST 
I WAIT 



BIT 11 (13 OCTAL) AND 
(40 OCTAL) MS DELAY. 
BIT IN WORD AT "LABEL". 
32 MS FOR BIT 11 TO SET. 



4263 
4264 
4265 
4266 
4267 
4268 
4269 
4270 
4271 
4272 
4273 
4274 
4275 
4276 



4277 
4278 



017436 
017436 
017442 
017444 
017446 
017452 
017456 
017460 
017462 
017464 
017466 
017472 
017474 

017500 
017502 
017502 
017506 



004567 
010204 
010102 
042701 
042702 
C00302 
006202 
006202 
006202 
016202 
010203 
004767 

010002 

010266 
004736 



164416 



170000 
007777 



002336 
175230 

000006 



WAIBIS:: SAVE 

MOV 
MOV 
BIC 
BIC 
SWAB 
ASR 
ASR 
ASR 
MOV 
MOV 
JSR 



JSR 
R2,R4 
R1.R2 
fll70000,Rl 
*7777.R2 
R2 
R2 
R2 
R2 

BITTBL(R2).R2 
R2,R3 
PC. MSLGET 



60$: 



017510 000207 



MOV 
PASS 



RTS 



R0.R2 
R2 



PC 



MOV 
JSR 



I SAVE CONTENTS OF GPRS RO THRU R5 . 
R5.PREG05 tCALL REGISTER SAVE SUBRT. 
iSET UP THE ADDRESS PARAMETER FOR MSLGET. 

iSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
iSEPERATE LINE NUMBER FIELD OF PASSED PARAM. 
(PUT LINE NUMBER FIELD IN LSBYTE. 
I SHIFT THE LINE NUMBER FIELD INTO THE PROPER 
i POSITION TO USE IT AS A WORD TABLE OFFSET 
I FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 
iGET BIT MAP OF LINE TO TEST FROM TABLE. 
» INDICATE THAT THE BIT SHOULD BE SET. 
tWAIT FOR THE BIT TO BE SET WITHIN TIME-OUT. 
( CARRY IS CORRECT UPON MSLGET RETURN. 
iPASS LAST VALUE READ AS OUTPUT PARAMETER. 
;RESTORE GPRS^ EXCEPT THE FOLLOWING: 
R2,R2SL0T(SP) ;PUT R2 IN STACK SLOT. 

PC,S(SP)* [RETURN TO PREG05 SUBRT 

: R2 - LAST VALUE READ LOOKING FOR CONDITION. 
; CARRY - SUCCESS FLAG (SET IF BIT FOUND SET). 



N9 



CZOHVbO DHU 11 r UNC TST PART2 
GLOBAL SUBROUTIMt 



4280 
4281 
428? 
4285 
4284 
4285 
4286 
4287 
4288 
4289 
4290 
4291 
4292 
4293 
4294 
4295 
4296 
4297 
4298 
4299 



MACRO ril200 
- WAITTX - 
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SEQ 117 



4300 
4,^01 
4502 
4503 
4304 
4305 
4506 
4307 
4508 

4309 
4310 



017512 
017512 
017516 
017522 
017526 
017532 
017534 
017540 
017544 

017546 
017546 

0175^0 



004567 
012701 
016702 
004 76 7 
103005 
012704 
004 767 
000261 



004736 
000207 



164342 
170556 
162500 
177704 

000005 
174516 



.SBTTL GLOBAL SUeROUl INE - WAITTX - 



I* 

!* 

J* 
J* 
!• 

i* 

;♦ 

i* 

!* 

;♦ 
I* 
i» 
J* 
J* 

:♦ 



- WAIT FOR TX TO FINISH - 
THIS SUeROUTINfc IS USED IN THE FIHAVL.TST. 
IT WAITS FOR TRANSMISSION TO COMPLETE IE TX^ACTIO,;. THEN DELAYS 
FOR 5 MILLISECONDS TO ALLOW TIME FOR THE LAST CHARACTER TO GET :N"^0 
THE FIFO. 



INPUTS: CSRA 
OUTPUTS: CARRY 
CALLING SEQUENCE: 
COMMENTS: 



CONTAINS THE ADDRESS OF THE CSR. 
■ SET INDICATES SUCCESS. 
JSR PC. WAITTX 



SUBORDINATE ROUTINES CALLED: DELAY .UAIBIS . 



WAITTX; : SAVE 





JSR 


MOV 


v*170536,Rl 


MOV 


CSRA.R2 


JSR 


PC.WAIBIS 


BCC 


60$ 


MOV 


#5,R4 


JSR 


PC. DEL AY 


SFC 





tSAVE CONTENTS OF f.PRS RO THRU R5 . 

R5.PREG05 :CALL REGISTER SAVE SUBRT 

tPASS TIME-OUT VALUE OF 350 MILLI SECS . 

iPASS THE ADDRESS OF THE CSR. 

jWAIT FOR DMA TO COMPLETE. TX_ACTI0N SET. 

; BRANCH IF NO TX ACTION. ABORT THE TEST. 

J PASS DELAY OF 5 '1ILLI SECS. 

jWAIT FOR LAST CHAR TO ARRIVE IN THE FIFO 

J SET CARRY TO INDICATE SUCCESS. 



60$: 



PASS 



RTS 



JSR 



PC 



iRESTORE GPRS. 
PC.aCSP)* 
;PASS THE CARRY 



iRETURN TO PREG05 SUBRT, 
BIT. SET INDICATES SUCCESS. 



GIO 



CZOHVBO DHU U TUNC TbT PART2 
GLOBAL SLIBROUTINE 

451^ 
4514 
4515 
4516 
45i: 
4518 
451<> 
4 5^0 
45?l 
450*? 
4525 
454'4 
4 5^^ 
4 5?f) 
45?' 
4526 
4 5P<» 
4550 
4551 
455c' 
4555 
4554 
4355 



MACRO M1200 
- WTWLNC • 
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SEQ 118 



.SBTTL 



GLOBAL SUBROUTINE 



WTWLNC 



- LINE CONTROL REGISTER SETUP ROUTINE - 
THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST (OUT) LINE 
CONTROL REGISTERS (LNCTRL) TO THt SPECIFIED STATE, ONLY THE LNCTRLS 
FOR THE SPECIFIED LINES ARE ALTERED. 

INPUTS! RO - NEW LINE PARANETERS. 

R5 - BIT MAP OF LINES TO BE ALTERED. 

CSRA - CONTAINS ADDRESS OF THE OUT CSR. 

IE5TAT - CONTAINS THE CURRENT STATE OF THE TX AND RX INTERRUPT 

ENABLE BITS IN THE CSR. 
l.NCTRA - CONTAINS ADDRESS OF THE OUT LNCTRL REGISTERS. 

OUTPUTS: LNCTRL - SPECIFIED OUT LINE CONTROL REGISTERS ARE ALTERED, 

CALLING SEQUENCE i JSR PC, WTWLNC 

COMMENTS; 

'JUbORDlNATE ROUTINES CALLEDt ALTFLD. 



4556 
4557 
4 558 
4559 
4540 
4541 
454? 
4543 
4 544 
4 545 
4 546 
4 54 7 
4 548 

43A9 



017552 
017552 



017556 
017562 
017564 
017566 



004567 164502 



016701 162454 

010002 

010505 

012704 177777 



WTWLNC:: SAVE 



I ♦ 



ibAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 



I SET UP THE PARAMETERS FOR THE CALL TO ALTFLD. 



I 



MOV 
MOV 
MOV 
MOV 



LNCTRA.Rl 
R0,R2 
R5.R5 
0-I.R4 



I SET UP THE REGISTER AOORCSS PARAMETER, 

iSET UP THE DESIRCD REGISTER CONTENTS. 

iSET UP THE BIT MAP OF LINES TO MLTER. 

iSELECT ALl REGISTER BITS TO BE ALTERED. 



t CALL THE SUBROUTINE WHICH ALTERS THE WFGISTFR CONTENTS. 



017572 004 767 173572 



0W5?6 
0175 76 
017600 



004 7 56 
000^0? 



I 



601 i 



JSR 

PASS 

RTS 



PC, ALTFLD 

JSR 
PC 



lALTtW THt HtGIUTER CONTENTS. 

(RETURN TO PRtG05 SUtiRT* 



iRtSTORt UPRii. 
PCiSCSP)* 



C^DHVBO DHU 11 F UNC TST PARTS 
GLOBAL SlieROUTTNE 



4551 
455.> 
45S5 
4 5S4 
4 5SS 
4 556 
435" 
4 558 
4 35^ 
4560 
4561 
4 56^ 
4365 
4564 
4365 
4 566 
4567 
4568 
4 569 
4570 
4571 
437^ 
4375 
4574 



MACRO M1200 
- WTWLPR - 
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StQ 119 



SBTTL GLOBAL SUBROUTINE 



WTWLPR 



- UNe PARAMETER REGISTER SETUP ROUTINE - 
THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST (OUT) LINE 
PARAMETER REGISTERS (LPR) TO THE SPECIFIED STATE. ONLY THE LPRS FOR 
THE SPECIFIED LINES ARE ALTERED. 



INPUTS! 



RO - NEW LINE PARAMETERS. 
R5 - BIT MAP or LINES TO BE ALTERED. 
CSRA - CONTAINS AOORiSS OF THE DUT CSR. 
lESTAT - CONTAINS THE CURRENT STATE OF THE 

ENABLE BITS IN THE CSR. 
LPRA - CONTAINS ADDRESS OF THE DUT LPR. 



TX AND RX INTERRUPT 



OUTPUTS 



LPR - SPECIFIED OUT LINE PARAMTER REGISTERS ARE ALTERED. 



JSR 



PC, WTWLPR 



CALLING SEQUENCE; 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: ALTFLD. 



4575 
4576 
4577 
4578 
4579 
4 580 
4581 
4 58? 
4585 
4 584 
4585 
4586 
4587 

4386 



01760? 
017602 



017606 

017612 
017614 
017616 



00456V 164252 



016701 162420 

010002 

010505 

012704 177777 



JSR 



J SAVE CONTENTS Gf GPRS RO THRU R5. 
R5.PREG05 (CALL REGISTER SAVE SU6RT. 



WTWLPR:: SAVE 

I SET UP THE PARAMETERS FOR THE CALL TO ALTFLD. 

MOV LPRA.Rl I SET UP THE REGISTER ADDRESS PARAMETER. 

MOV R0,R2 I SET UP THE DESIRED REGISTER CONTENTS. 

MOV R5,R3 iSET UP THE BIT MAP OF LINES TO ALTFf\ 

MOV •-I.R4 iSELECT ALL REGISTER BITS TO LE ALT'iRlO. 

i CALL THE SUBROUTINE WHICH ALTERS THE REGISTER CONTENTS. 



017622 004767 173542 



017626 
017626 
017630 



004 756 
000207 



60fj 



JSR 

PASS 

RTf 



PC , AL TFLO 

JSR 
PC 



(ALTER THE RU.ISTER CONTENTS. 

(RETURN TO PREG05 SUGRT. 



iRESTORE GPRS. 
PC.aCSP). 



W'?^i8p9'^yE^*iEMoiHN^'^''^2 "-^EPI^iRf^oo 
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SEQ 120 



4590 

4591 

4592 

4593 

4394 

4395 

4396 

4397 

4398 

4399 

440C 

4401 

4402 

4405 

4404 

4405 

4406 

4407 

4408 

4409 

4410 

4411 

4412 

4413 

4414 

4415 

4416 

4417 

4416 

4419 

4420 

4421 

4422 

4423 

4424 
4425 



017652 
017636 
017640 
017644 
017650 
017652 
017656 
017662 
017664 
017672 
017674 
017674 
017676 
017700 



005767 
001402 
005367 
005767 
001402 
005367 
005367 
001006 
016767 
010046 

104422 
0126OO 
000002 



SBTTL INTERRUPT SERVICE ROUTINE - CLKINT 

THIS ROUTINE IS EXECUTED CLKHRZ TIMES PER SECOND. IT DECREMENTS THE 
TWO TIMER COUNTERS DOWN TO ZERO. 



INPUTS: 



OUTPUTS 



TIMERl - TIMER COUNTER #1. 
TIMER2 - TIMER C0Lf4TER *2. 
TIMERS - TIMER COUNTER FOR CALL OF BREAK MACRO. 

THE 2 TIMER COUNTERS ARE DECREMENTED IF THEY ARE NOT ZERO. 



CALLING SEQUENCE: 



PUT OCLKINT IN THE CLOCK INTERRUPT VECTOR SLOT. 
PUT THE DESIRED TIME PERIOD (SECONDS TIMES CLKHRZ) IN 
EITHER TIMERl OR TIMER2 AND POLL THE RESPECTIVE TIMER 
COUNTER TO DETECT ITS GOING TO ON TIME-OUT. 



COMMENTS: THE 2 COUNTERS WILL NOT WRAPAROUND BUT WILL STOP AT 0. THIS 

ALLOWS THE DETECTION OF A TIME-OUT ANY TIME AFTER THE TIME-OUT 

HAS OCCURRED UNTIL THE TIMER COUNTER IS SET TO ANOTHER VALUE, 

SueOftOINATE ROUTINES CALLED: NONE. 



162456 

162450 
162446 

162440 
162436 

162432 162426 



CLKINT 



2i 



4$ 



60$! 



TST 


TIMERl 


BEQ 


2( 


DEC 


TIMERl 


TST 


TIMER2 


BEQ 


4» 


DEC 


TIMeR2 


DEC 


TIMERS 


BNE 


60 » 


MOV 


BCOUNT.T 


MOV 


RO. -CSP) 


BREAK 




MOV 


(5P)»,R0 


RTl 





TIMERS 



TIMERl AT ZERO. 

LEAVE IT AT ZERO IF IT IS ZERO. 

TIME COUNT. 

TIMER2 AT ZERO. 

LEAVE IT ALONE IF IT'S ALREADY ZERO 

TIME COUNT, 

THE BREAK COUNT. 
jEXIT IF NOT TIME TO CALL BREAK. 
iSET UP TIME TILL NEXT BREAK. 
I SAVE CONTENTS Of RO FROM BREAK MACRO. 
I CHECK FOR OPERATOR CONTROL/C, 



I CHECK FOR 
(BRANCH ,0 
I DECREMENT 
I CHECK FOR 
1 BRANCH TO 
I DECREMENT 
(DECREMENT 



(RESTORE CONTENTS OF RO, 



TRAP C$BRK 



ElO 



CZDHVBO OHU-11 FUNC TST PART2 
INTERRUJPT SERVICE ROUTINE 

4427 
4428 
4429 
44J0 
4451 
4432 
4453 
4454 
4435 
4436 
4437 
4438 
4439 
4440 
4441 
4442 
4443 
4444 

4445 01770? 012767 000001 

4446 017710 000002 



MACRO M1200 15 -MAR -64 09:28 PAGE 95 
- RXDECr - 

.SBTTL INTERRUPT SERVICE ROUTINE - RXDECT - 

- RX INT OECTION ROUTINE - 
THIS ROUTINE DETECTS AN RX INTERRUPT BY SETTING THE RXINTC WORD TO 1. 
THIS ROUTINE IS USED IN THE RXTIMER TESTS. 

INPUTS: RXINTC - STORGE FOR THE INTERRUPT COUNT. 

OUTPUTS: RXINTC - SET TO 1. 

CALLING SEQUENCE: 



SEQ 121 



COMMENTS: 



PUT THE ADDRESS OF THE LABEL RXDECT IN THE VECTOR 
LOCATION. 

THIS ROUTINE DOES NOT READ THE RXFIFQ, 



SUBORDINATE ROUTINES CALLED: NONE. 



162356 RXDECTi: MOV #1. RXINTC 

RTI 



(INDICATE THAT AN RX-INT HAS OCCURED. 



s^sgrrRi^r^^R^^g^ ^§iT?ftr^ 



MA 



^PSr^A 
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SEQ 122 



4446 
4449 
4450 
4451 
4452 
4453 
4454 
4455 
4456 
4457 
4458 
4459 
4460 
4461 
4462 
4463 
4464 
4465 
4466 
446 V 
4468 
4469 
4470 
4471 
4472 
4473 
4474 
4475 
4476 



017712 
017716 
017720 
017724 
017732 



021627 
001402 
000177 
052767 
000002 



014200 

162352 
lOOOOO 



.SBTTL GLOBAL TRAP SERVICE ROUTINE - TP4RTN - 

t* BUS TIME-OUT TRAP C004 TRAP) SERVICE ROUTINE - 

(* THIS ROUTINE DETERMINES IF THE 004 TRAP WAS CAUSED BY 

* AN "EXPECTED" ERROR OR NOT BY EXAMINING THE RETURN PC VALUE ON THE 

1* STACK. IF THE TRAP IS UNEXPECTED, THIS ROUTINE JUMPS TO THE NORMAL 



J* 

,♦ 

;* 
I* 
;♦ 
;* 
i* 
i* 
I* 
i* 
:* 

!♦ 

t* 
;* 
I* 
»* 
J* 



DIAGNOSTIC SUPERVISOR 004 TRAP HANDLING ROUTINE. 



INPUTS: 



SP - POINTS TO THE PC WHERE THE TRAP OCCURED. 

AORPTR - LABEL AT THE ADDRESS WHERE "EXPECTED" TRAPS OCCUR. 

TP4FLG - 004 TRAP FLAGS. 



OUTPUTS: TP4FLG - BIT 15 IS SET IF "EXPECTED" TRAP OCCURED, 
CALLING SEQUENCE: 



COMMENTS: 



PUT ADDRESS POINTED TO BY TP4RTN IN 004 VECTOR. 
OCCURENCE OF 004 TRAP VECTORS TO THIS ROUTINE. 

ANY 004 TRAP WHICH OCCURS AT AN ADDRESS OTHER THAN THAT LABELED 
ADRPTR WILL BE HANDLED BY THE NORMAL 004 TRAP SERVICE ROUTINE. 



SUBORDINATE ROUTINES CALLED: NONE. 



TP4RTN:: CMP 
BED 
JMP 
162346 2J; BIS 

RTI 



(SP).#ADRPTR 

STP4VEC 
<?BIT15,TP4FLG 



; COMPARE EXPECTED ADR AGAINST TRAP RET PC. 
I IF THEY MATCH, CONTINUE iHIS ROUTINE. 
ilF NOT. JUMP TO NORMAL 004 TRAP SERVICE RTN 
(SET THE 004 TRAP OCCURED FLAG. 
J ALL DONE, GO BACK TO THE TEST. 



C2DHVB0 DHUll FUNC TST PARTif 
INTERRUPT SERVICE ROUTINE 



4478 
44 79 
4480 
4481 
4482 
446? 
4484 
4485 
4486 
4487 
4488 
4489 
4490 
4491 
4492 
4493 
4494 
4495 
4496 
4497 
4498 
4499 
4500 
4501 
4502 



MACRO M1200 
- TXAINT - 
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SEQ 123 



4503 
4504 
4505 
4506 
4507 
4508 
4509 
4510 
4511 
4512 
4513 
4514 
4515 
4516 
4517 
4518 
45 V9 
45^0 
4521 
4522 
4523 
4524 
4525 
4526 

4527 



017734 
017734 

017740 
017744 
017746 
017750 
017752 
017 756 
017762 
017766 

017770 
017774 
020000 



02OOO4 
020010 
020012 
020014 

020016 
020024 
020024 
020026 



004567 

016701 
005201 
102001 
005301 
010167 
016703 
005777 
100402 

052703 
O10367 
012702 



005 n ' 

005302 
001373 



164120 
162326 



162314 
162312 
162240 



100000 
162274 
000040 



162216 



052767 040000 162250 

004 736 
000002 



.SBTTL INTERRUPT SERVICE ROUTINE - TXAINT - 

« , 4>4> * 4> 4* *4>*4>44*4>4>«4 « + *****«*** *************** AAA**A*****Aj**«*A A**** t*4>4i**4i*«* 

* - TRANSMIT ACTION INTERRUPT SERVICE ROUTINE - 

* THIS ROUTINE HANDLES A TX INTERRUPT BY COUNTING THE INTERRUPT. 

* SETTING A FLAG IF THE TX ACTION BIT IS CLEAR, AND READING THE CSR 

* UNTIL THE TX.ACTION BIT CLEARS OR THE MAXIMUM READ COUNT IS EXCEEDED. 

(♦ 

!• INPUTS: CSRA - CONTAINS THE ADDRESS OF THE CSR. 

TXINTC - HOLDS THE COUNT OF THE NUMBER OF TX INTERRUPTS, 

TXINTF - TX INTERRUPT FLAGS. 



;• OUTPUTS: 

t* 

I* 

J* 

* 

* 

* 

I - 



TXINTC 
TXINTF 



CALLING SEQUENCE: 



COMMENTS: 



CONTAINS THE UPDATED TX INTERRUPT COUNT. 

TX INTERRUPT FLAGS (BIT 15 SET IF TX ACTION CLEAR 

BIT 14 SET IF MAX READ COUNT EXCEEDED) 

PUT THE ADDRESS OF THE LABEL TXAINT IN THE VECTOR 
LOCATION, 



SUBORDINATE ROUTINES CALLED: NONE 



TXAINT: : SAVE 



JSR 



R5.PREG05 



;CALL REGISTER SAVE SUBRT 



2% 



4$ 



; ♦ 



MOV 


TXINTC »R1 


INC 


Rl 


BVC 


2$ 


DEC 


Rl 


MOV 


Rl, TXINTC 


MOV 


TXINTF, R3 


TST 


OCSRA 


BMI 


4$ 


BIS 


<«IT15,R3 


MOV 


R3. TXINTF 


MOV 


032. ,R2 



J GET THE TX-INT COUNT. 

: INCREMENT THE COUNT. 

I BRANCH IF NO OVERFLOW OCCUREO. 

(RESET THE COUNT TO 177777. 

(SAVE THE NEW COUNT. 

(GET THE TX-INT FLAGS. 

(READ THE CSR. 

(AVOID SETTING THE ERROR FLAG IF 

1 THERE IS A TX ACTION. 

iSET THE FLAG. 

(UPDATE THE TX-INT FLAGS. 

(SET THE MAX TX ACTIC»N READ COUNT 



( READ THE CSR UNTIL THE TX ACTION FIFO IS EMPTY OR 
( IS EXCEEDED. 



THE MAX READ COUNT 



( ■ 

6$: 



60* i 



TST 
BPL 

DEC 
BNE 

BIS 
PASS 

RTI 



aCSRA 
60$ 
R2 
6J 

#BIT14, TXINTF 
JSR 



(READ THE CSR. 
(EXIT IF TX.ACTION FIFO 
(DECREMENT THE MAX READ 
(BRANCH TO READ ANOTHER 
(COUNT IS NOT EXCtEOEO. 
(SET THE "MAX TX_ACT1UN 

PC.SCSP)* 



IS EMPTY. 

COUNT. 

TX ACTION 



IF MAX READ 



COLfNT EXCEEDED- FLAG. 
(RETURN TO PREG05 SUBRT, 



HIO 



CZDHVBO OHUll TUNC TST PART? 
INTERRUPT SERVICE ROUTINE 



4556 
4557 
4558 
4559 
4540 
4541 
454^ 
4545 
4544 
4545 

4546 
4547 
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- TXAINT - 



.SBTTL REPORT CODING SECTION 



SEQ 124 



4548 
4549 
4550 
4551 



020050 
020050 

020050 

020050 000167 

020052 000000 



020054 
020054 
020034 104425 



I THE REPORT CODING SECTION CONTAINS THE 

: "PRINTS" CAULS THAT GENERATE STATISTICAL REPORTS 



BGNRPT 



L$RPT: : 



EXIT 

.EVEN 
ENORPl 



RPT 



.WORD JJJMP 
.WORD L10017-2 



L10017: 



TRAP C$RPT 



C7DHVB0 DHU^n fUNC 
PROTECTION TABLE 



4555 
4561 
456? 
4563 
4564 
4565 
4566 
456 7 
4568 



TST PART2 



456^ 
4570 

4571 
4572 
45 7? 
4S74 
4575 



0200 J6 
020056 

020056 

020040 

0. '":2 

0c:0044 



JIO 

MACRO M1200 15-MAR-84 09:28 PAGE 99 
,SBTTL PROTECTION TABLE 



SEQ 125 



t ♦♦ 



THIS TABLE IS USED Bv THE RUNTIME SERVICES 
TO PROTECT THE LOAD MEDIA. 



177777 
177777 
177777 



BGNPROT 



•1 
-1 
-1 

ENDPROT 



lOFrSLT 
J OFFSET 

iOrrsET 



INTJ 
INTO 
INTO 



P- TABLE 
P- TABLE 
P- TABLE 



LJPf^OT:: 

FOR CSR ADORE SS 
FOR MASSBUi AUDRESS 
FOR DRIVE NUMtlER 



CZDHVBO 


OHCI 1 1 


"UNC TbT 


PART2 


PROTECTION TABLt 




45<)7 








4S98 








4599 








4bOO 








4601 








460c? 








4605 








4604 








4605 








4606 








4607 








4608 








4609 








4610 








4611 


020044 
020044 






461c' 








4613 


020044 








020044 


012700 


000040 




020050 


104447 




4614 


020052 








020052 


103416 




4615 








4616 


020054 








020054 


012700 


000037 




020060 


104447 




4617 


020062 








020062 


103556 




4618 








4619 


020064 








020064 


012700 


000035 




020070 


104447 




4620 


020072 








020072 


103555 




4621 








4622 


020074 








020074 


012700 


000056 




020100 


104447 




4623 


020102 








020102 


103161 




4624 


020 10« 


000167 


000540 


4625 


020110 






4626 


020110 








020110 


104433 




4627 








4628 








4629 








4630 


020112 








020112 


012700 


000114 




020116 


104462 






020120 


010001 




4651 


020122 


012167 


162156 


4632 


020126 


012167 


162154 


4635 


020132 


012167 


162152 


4654 


020156 


012167 


162150 


4635 


020142 


026 727 


162144 


4636 


020150 


001004 
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SEQ 126 



.SBTTL INITIALIZE SECTION 

THIS SECTION CONTAINS THE CODE WHICH IS PERFORMED AT THE BEGINNING OF 
EACH PASS OR AFTER A CONTINL€ COMMAND. 
THIS CODE PERFORMS THE FOLLOWING ACTIONS: 



MOVES THE INFORMATION HELD IN THE HARDWARE P- TABLE INTO THE GLOBAL 
DATA AREA. 



J . - 



BGNINIT 



;SEE IF PROGRAM JUST STARTED, BR IF YES 
READEF <>EF. START 



LtlNIT 



BCOMPLETE 



NEUSTA 



;SEE IF PROGRAM JUST RESTARTED. BR IF YES 
READEF <^EF, RESTART 



BCOMPLETE 



NEWRES 



J SEE IF THIS IS A NEW PASS, BR IF YES 
READEF «EF.NEW 



BCOMPLETE 



NEWPAS 



;SEE IF PROGRAM WAS JUST CONTINUED 
READEF «EF. CONTINUE 



NEWSTA: 



BNCOMPLETE 
JMP ENDIT 
BRESET 



GETPRM 



MOV OEF. START, RO 
TRAP CJREFG 

BCS NEUSTA 



MOV *£F. RESTART, RO 
TRAP CJREFG 

BCS NEWRES 



MOV *£F.NEW,RO 
TRAP CSREFG 

BCS NEWPAS 



MOV «F. CONTINUE, RO 
TRAP C5REFG 

BCC GETPRM 



; RESET THE BUS TO PPEVENT ILLEGAL INTERRUPTS. 



TRAP 



SET UP FOR LINF TIME CLOCK INTERRUPTS. 



1 - 



CLOCK L.Rl 



000062 



MOV 


(R1)*.CLKCSR 


MOV 


CR1)»,CLKBRL 


MOV 


(R1)«-.CLKVEC 


MOV 


(R1)».CLKHRZ 


CMP 


CLKHRZ,<>50, 


BNE 


2$ 



jGET THE CLOCK PARAMETERS. 

MOV 

TRAP 

MOV 

» STORE CLOCK CSR ADDRESS. 

I STORE CLOCK BUS REQ INT LEVEL. 

i STORE CLOCK INTERRUPT VECTOR. 

1 STORE CLOCK FREQUENCY. 

(TEST FOR 50HZ LINE F RE QUE NO . 

1 BRANCH IF CLOCK IS NOT 50HZ. 



C$RESET 



O'L.RO 
CJCLCK 
R0»R1 



CZDHVBO DHU-11 FUNC TST PART2 
INITIALIZE SECTION 
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KIO 

PAGE 100-1 



SEQ 127 



4637 
4638 
4639 
4640 



4641 
4642 
4643 
4644 



4645 
4646 
4647 
4643 
4649 
4650 
4651 
4652 
4653 
4654 
4655 
4656 
4657 
4658 
4659 
4660 
4661 
4662 
4663 
4664 
4665 
4666 
4667 
4668 
4669 
4670 
4671 
4672 
4673 
4674 
4675 
4676 
4677 
4678 
4679 
4680 
4681 
4682 
4683 
4684 
4685 



020152 
020160 
020162 
020170 
020170 
020174 
020200 
020204 
020210 
020212 
020216 
020222 
020224 
020230 
020230 
020234 



020236 
020244 



020252 
020256 
020264 
020270 
020274 
020300 
020306 
020310 
020314 



020322 
020330 
020336 
020342 
020546 
020352 
020356 
020362 
020366 
020372 
020400 
020402 
020410 
020414 



012767 
000403 
012767 

012746 
012746 
016746 
012746 
104437 
062706 
016/00 
006i00 
010067 

012700 
104441 



000024 
000021 

000300 
017632 
162104 
000003 

000010 
162070 

162072 

000240 



016767 
012767 



005067 
012767 
012700 
016701 
004767 
016767 
103403 
005067 
000402 



157542 
017712 



162022 
000100 
002302 
162010 
173666 
161772 

161776 



020316 004767 173230 



016767 
012767 
005067 
005067 
012700 
016701 
005067 
005067 
004767 
016767 
103003 
012767 
005067 
000167 



157456 
017712 
161736 
161734 
002302 
161752 
161750 
161746 
173574 
161700 

000001 
161650 
000006 



162144 
162134 



2* 
4$ 



MOV »20..MSTIC1< 

BR 4$ 

MOV #17. .MSriCK 

SETVEC CLKVEC . ^CLKINT . V/PRI06 



(INDICATE 20MS PER CLOCK TICK. 



MOV CLKHRZ.RO 

ASL RO 

MOV RO.BCOONT 

SETPRI *PRI05 



(INDICATE 17 MS PER CLOCK TICK. 

(INITIALIZE CLOCK INTERRUPT 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

(INITIALIZE THE BREAK COUNT 

I TO CAUSE A BREAK 

t EVERY 2 SECONDS. 

(ALLOW CLOCK INTERRUPTS DISABLE 

MOV 
TRAP 



VECTOR. 

*PRI06.-CSP) 
V>CLKINT, -CSP) 
CLKVEC. -CSP) 
VJ3.-CSP) 
CJSVEC 
#10. SP 



OTHERS. 

#PRI05,R0 

CSSPRI 



162032 
157532 



162016 



157476 



ENABLE THE LINE TIME CLOCK CLTC) CHECKING TO MAKE SURE THAT THE CSR 
IS ACCESSABLE 

FIRST SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 

(SAVE THE EXISTING 004 TRAP VECTOR. 

(SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 

304 TRAP IN CASE CSR IS NOT THERE, 

(CLEAR THE 004 TRAP FLAG. 

(SET UP TO SET BIT6 OF THE LTC CSR. 

(SET UP WORDl AS THE CKTRAP MOVE SOURCE. 

(SET UP LTC CSR AS DESTINATION FOR CKTRAP MOVE 

(MOVE AND CHECK FOR TRAP. 

(RESTORE THE NORMAL 004 TRAP VECTOR. 

(IF NO TRAP, LTC IS THERE SO CONTINUE. 

(CLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 

(BYPASS THE FOLLOWING CALIBRATION PROCEDURES. 



6$: 

t CHECK FOR MEMMORY MANAGEMENT PRESENT ON THIS MACHINE. 
( IF MEM MGT IS PRESENT, DISABLE IT. 



MOV 


4,TP4VEC 


MOV 


«TP4RTN.4 


BLE LTC 


CHECKING FO 


CLR 


TP4FL6 


MOV 


#6IT6.WOR01 


MOV 


#W0RD1.R0 


MOV 


CLKCSR.Rl 


JSR 


PC, CKTRAP 


MOV 


TP4VEC,4 


BCS 


6$ 


CLR 


CLKHRZ 


BR 


8$ 


ATE THE 


DELAY ROUTI 


JSR 


PC.CALMSL 



361746 
157446 



8$: 



157404 
161722 



10 J J 



MOV 
MOV 
CLR 
Cl.R 
MOV 
MOV 
CLR 
CLR 

JSR 
MOV 

BCC 
MOV 

CLR 

JMP 



4.TP4VEC 

«TP4RTN.4 

TP4FLG 

UORDl 

OWOROl.RO 

MMSRO.Rl 

MMPRES 

MMENAB 

PC, CKTRAP 

TP4VEC,4 

10$ 

#1. MMPRES 

PASCNT 

NEWPAS 



(SAVE THE EXISTING 004 TRAP VECTOR. 

(SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 

(CLEAR THE 004 TRAP FLAG. 

(PREPARE TO CLEAR THE MEM MGT SRO REGIS VEH. 

(SELECT CLEARED WORD AS CKTRAP RTN SOURCE. 

(SELECT MEM MGT SRO REGISTER AS DESTINATION. 

(INDICATE NO MEM MGT PRESENT IN CASE IT ISN'T 

(INDICATE MEM MGT IS NOT ENABLED. 

(CLEAR THE MEM MCT SRO REG AND CHECK FOR TRAP 

(RESTORE THE NORMAL 004 TRAP VECTOR, 

(SKIP INDICATING MEM MGT PRESENT IF IT ISN'T. 

(INDICATE THAT MEM MGT IS PRESENT. 

(CLR COUNTER USED IN REPORTING ROM VERSION #, 

;SKIP AROUND THE BUS RESET, IT'S BEEN DONE, 



CZOHVBO OHU-11 FUNC TST PART2 
INITIALIZE SECTION 
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SEQ 128 



4666 
468 7 

4688 
4689 
4690 
4691 
4692 
4695 
4694 
4695 
4696 
4697 
4698 
4699 
4700 
4701 
4702 
4703 
4 704 
4705 



4706 

4707 
4708 
4709 
4710 
4711 
4712 
4713 
4714 
4715 
4716 
4717 
4718 
4719 
4720 
4721 
4722 
4723 
4 724 
4 725 
4726 
4727 
4728 
4729 
4730 
4731 
4 732 
4733 
4 734 
4735 
4736 
4737 



020420 
020420 
020422 
020426 
020426 



020434 
020440 
020442 



020446 
020446 
020452 
020460 

020462 
020462 
020466 
020470 
020472 
020472 
020474 



020476 
020502 
020504 
020510 
020514 
020520 
020524 



020530 
020534 
020536 
020540 
020544 
02D550 
020552 
020554 
020556 
020560 



020562 
020566 



104433 

005067 161636 

012767 177777 161570 



005267 
001002 
005367 



005267 
026767 
002362 



016700 
104442 
010001 

103401 
000764 



012167 
012102 
010267 
062702 
010267 
012167 
111167 



016701 
005201 
005201 
012703 
012702 
010122 
005201 
005201 
005303 
001373 



012 700 



NEWRES: BRESET 
CLR 



NEUPAS: 



t ♦ 



MOV 



PASCNT 
*-l,UNITN 



(RESET THE BUS TO PhtVENT ILLEGAL. INTERRUPTS. 

TRAP CSRESET 
I CLR COUNTER USED IN REPORTING ROM VERSION i> , 

iRESET LOGICAL DEVICE TO -1 



I INCREMENT THE PASS COUNTER, CORRECT FOR ANY OVERFLOW, 
THIS COUNTER IS USED IN THE ROM VERSION TEST. 



161624 
161616 



161552 

161546 161332 



161536 



INC 
BNE 

DEC 



PASCNT 
GETPRM 
PASCNT 



(INCREMENT THE PASS COUNTER. 

(BRANCH IF WE HAVE NOT YET! OVERFLOWED. 

(SET PASS COUNT TO 177777 OCTAL. 



I GET THE HARDWARE PARAMETERS FOR THIS UNIT. 
GETPRM: 

INC UNITN 

CMP UNITN. LJUNIT 

BGE NEWPAS 



I INCREMENT LOGICAL DEVICE NUt^ER 
(SEE IF MAXIMUM UNIT NO. EXCEEDED 
(BR IF YES 



GPHARD UNITN, Rl 



161524 

161504 
000004 
161476 
161474 
161472 



161472 



000007 
002230 



30$: 



BCOMPLETE 30$ 


BR 


GETPRM 


t**4>4i>f4^4>**4>« HARDWARE 


MOV 


(RIV.CSRA 


MOV 


(R1)*.R2 


MOV 


R2,RXVECA 


ADD 


#4,R2 


MOV 


R2,TXVECA 


MOV 


(RD^.ACTLNS 


MOVB 


(RD.LOPBCK 



(GET P-TABLE POINTER INTO Rl 

(BR IF DEVICE AVAILABLE 
(SKIP THIS DEVICE 



MOV 


UNITN. RO 


TRAP 


CSGPHRD 


MOV 


RO.Rl 



BCS 



30 J 



PARAMETER MOVING CODE **************** 

(STORE DHU-11 CSR ADDRESS IN DEV. REG. ADDRESS TABLE 
(GET THE RX INTERRUPT VECTOR ADDRESS. 
J STORE RX INT VECTOR ADDRESS. 

INTERRUPT VECTOR ADDRESS, 

VECTOR ADDRESS. 

ACTIVE LINE BIT MAP 

LOOPBACK MODE 



jCALCULATE TX 
(STORE TX INT 
(STORE DHU-11 
(STORE DHU-11 



I - 



12$: 



CALCULTATE DEVICE REGISTER ADDRESSES , AND PUT THEM IN THE 
DEVICE REGISTER ADDRESS TABLE. 

(COPY CSR ADDRESS 

(INCREMENT CSR ADDRESS 

( COPY BY 2. 

(SET UP REGISTER COUNT 

(GET LOCATION WHERE RBUF ADDRESS GOES IN TABLE 

(STORE REGISTER ADDRESS IN TABLE 

(INCREMENT REGISTER ADDRESS 

i BY 2. FOR THE NEXT DEVICE REGISTER. 

[DECREMENT REGISTER COUNT 

(LOOP IF NOT DONE 



MOV 


CSRA.Rl 


INC 


Rl 


INC 


Rl 


MOV 


07. H3 


MOV 


*RBUFA,R2 


MOV 


R1.CR2)* 


INC 


Rl 


INC 


Rl 


DEC 


R3 


BNE 


12$ 



( INITIALISE THE BMP CODE QUEUE. 



002412 
002612 



MOV OBMPCQB.RO 
MOV ftBMPCQE.Rl 



(GET THE START ADDRESS OF THE QUEUE, 
jGET THE END ADDRESS OF THE QUEUE, 



CZOHVBO DHU-ll FUNC TST PART2 
INITIALIZE SECTION 
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SEQ 129 



4738 
4739 
4740 
4741 
4742 
4743 
4744 
4745 
4746 
4747 
4748 
4749 
4750 



4751 
4752 
4753 
4754 
4755 
4756 
4757 



4758 



4759 
4760 



020572 
020576 
020600 
020602 



020604 
020612 
020614 
020622 
020624 
020624 
020630 
020634 
020640 
020642 
020644 
020650 



020654 
020654 
020660 
020662 
020662 
020662 



010067 161612 
005020 
020001 
103775 



032767 
001416 
026727 
003412 

016746 
012746 
012746 
010600 
104417 
062706 



020650 005067 



14$: 



MOV 
CLR 
CMP 
8L0 



RO.BMPCQP 
CRO) + 
RO.Rl 
144 



,SET THE POINTER TO THE START OF THE QUEUE. 
i CLEAR OUT THE CONTENTS OF THE QUEUE. 
I CHECK IF END OF QUEUE HAS BEEN REACHED. 
I LOOP IF NOT ALL DONE. 



I ♦ 



000020 
161172 



161374 
005231 
000002 



000006 
161574 



161376 
000001 



REPORT THE UNIT NUMBER IF THE SOFTWARE P-TABLE QUESTION WAS ANSWERED YES. 
AND THE MAXIMUM UNIT NUMBER IS GREATER THAN 1. 

J CHECK IF THE QUESTION WAS ANSWERED YES. 

(SKIP REPORTING UNIT NUMBER IF IT IS DISABLED. 

(CHECK MAXIMUM NUMBER OF UNITS SELECTED. 

;00 NOT REPORT UNIT NUMBER IF MAX NUMBER < 1. 

J REPORT UNIT NUMBER. 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



BIT 


*eiT4, OPTION 


BEQ 


let 


■ iP 


L$UNIT,#1 


BlE 


16$ 


PRINTF 


OMFUNIT.UNITN 



16$ 



UNITN, (SP) 

^FUNIT.-CSP) 

^>2.-CSP) 

SP.RO 

C$PNTF 

*6.SP 



CTRLCF 



tCLR THE CTRL-C TEST ABORT FLAG. 



ENOIT: CLR 

SET THE PROCESSOR PRIORITY TO DISABLE ALL INTERRUPTS. 



012700 000340 
104441 



104411 
000000 



SETPRI *PRI07 

ENOINIT 

TNUM -» 



iSET PROCESSOR PRIORITY TO 7. 

MOV «PRrC7,R0 
TRAP C$SPR1 

L10021: 

TRAP C$INIT 

(INITIALIZE THE ASSEMBLER TEST NUMBER VARIABLE, 



NIO 



CZDHVBO DHU-Ll TUNC TST PARTS 
INITIALIZE SECTION 



4/(>9 

4770 
4771 
4772 
4773 
4774 
477^j 
4776 
4777 
4776 
'17 79 

4-'ao 
4r8i 

*'i78i? 
4789 
4790 
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.SBTTL AUTODROP SECTION 



SEQ 130 



THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODf. IF 
THE "ADR" FLAG WAS SET. THE UNITC5) UNDER TEST ARE LHECKED TO 
SEE IF THEY WILL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY 
; DROPPED FROM TESTING. 



020664 
020664 



020664 
020664 
020664 



8GNAUT0 



ENOAUTO 



L$AUTO 



L 10022: 



104461 



TRAP 



C$AUTO 



CZDHVBO DHU 11 TUNC TbT PART2 
AUTODROP SECTION 



A7<i9 
4800 
4601 
460^ 
4803 
4804 
480^ 
4806 
4807 
4808 
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SEQ 131 



C 
H 



.SBTTL CLEANUP CODING SECTION 

1*TME CLEANUP COOING SECTION CONTAINS THE COOING THAT IS PERFORMED 
I AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 
I ■ - 



4809 
4810 
4811 
4812 

4815 
4814 
4825 
4824 



4825 
485r 
4858 
4859 
4840 



020666 
020666 

020666 
0206 72 
020674 
0206 74 
020676 



BGNCLN 



005 76 7 
001401 

104435 



161356 



T5T 


CTRLCF 


BEQ 


21 


BRESET 





LICl EAN: : 

iDID WE GET HERE BY CTRL-C FROM TEST? 

iCTRL-C FROM TEST? NQ. SKIP BUS RESET. 

|YES. CLR ANY OMAiJ OR OUTSTANDING INTERRUPTS. 

TRAP CJRESET 



2ii 



020676 

020676 104452 

020700 000002 



020 702 
020 702 
020702 



EXIT 

.EVEN 
eNOCLN 



CLN 



TRAP 

.WORD 



C$FXIT 
L 10025 



Ll0025i 



104412 



TRAP 



Cf CLEAN 



C 1 1 



mm> mM \,mi}>^ 
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SEQ 132 



48S0 

48SC 
485? 
4854 
48SS 
4t^Sb 
4857 
4858 

4859 
4860 



4861 
4862 
4863 



4864 

4865 
4866 
486 7 



4868 

4869 
4870 



020704 
020704 

020704 
020704 
020706 
020712 
020716 
020720 
020722 
020726 

020730 
020735 
020736 
020741 
020744 
02074 7 
020752 
020755 
020760 
020765 
020766 
020771 
020774 
0207 7 7 
021002 

021006 

021006 
021006 
021010 



021012 
021012 
021012 



.SBTTL DROP UNIT SECTION 



I THE DROP UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
I TO NO LONGER BE TESTED. 
I •- 

BGNDU 



010046 
012746 
012746 
010600 
104417 
062706 
000427 

045 
125 
124 
066 
040 
117 
105 
106 
115 
125 
110 
040 
123 
116 
045 



000167 
000000 



104455 



PRINTF tfDRU\RO 



020730 
00COO2 



000006 



101 
116 
045 
045 
104 
120 
104 
122 
040 
122 
105 
124 
124 
107 
116 



040 DROP I 

111 

104 

101 

122 

UO 

040 

117 

106 

124 

122 

105 

111 

056 

OOO 

EDROP; 



I «DU: : 

(REPORT UNIT THAT HAS BEEN DROPPED. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 
BR EDROP I BRANCH AROUND THE MESSAGE. 

.ASCIZ/*A UNITK06*iA DROPPED TROM FURTHER TESTING >N/ 



RO,-(SP) 
«)R0P. -CSP) 
02. (SP) 
SP.RO 
CIPNTF 
06. SP 



.EVEN 



EXIT 



ENODU 



DU 



U1002A; 



.WORD 
.WORU 



TRAP 



jijHP 
L 10024 -2 



c$ou 



fiftBP^Bfii'i'^yEifibW 



NC TST PART2 



4879 
4880 
4881 
4882 
4883 
4884 
4885 
4886 
4887 
4688 
4889 

4890 
4891 



4892 
4895 
4894 
4895 
4896 



4897 



021014 
021014 

021014 
021014 
021016 



DU 
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.SBTTL ADD UNIT SECTION 



THE ADO -UNIT SECTION CONTAINS ANY CODE THE PROGRAMHER WISHES 
TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
TO THE TEST CYCLE. 



00016 7 
000000 



021020 
021020 
021020 104452 



BGNAU 
EXIT AU 

.EVEN 
ENDAU 



L$AU: : 



U 10025: 



SEQ 133 



.WORD 
.WORD 



J$JMP 
L 10025 -2 



TRAP 



C$AU 



Ell 



C2DHVB0 DHU 11 TUNC TST PART„ 
HARDWARF TEST - ADRA - 



MACRO M1200 15-MAR-84 09!26 PAGE 105 



SEQ 134 



4899 
4900 
4901 
4902 
4905 
4904 
4905 
4906 
490 V 
4908 
4909 
4910 
49U 
4912 
4915 

4914 

4915 

4916 

4917 

4918 

4919 

4920 

4921 

4922 

4925 

4924 

4925 

4926 

4927 

4928 

4929 

4930 

4951 

4952 

4933 

4954 

4955 

4956 

4937 

4958 

4959 

4940 

4941 

4942 

4943 

4944 

4945 

4946 

4947 

4948 

4949 

4950 

4951 

4952 

4955 

4954 



021022 
021022 

021022 
021050 
021056 
021044 
021052 



021060 
021066 
021074 



021076 
021102 
021106 
021112 
02X114 
021120 
021126 
021130 
021134 
021140 
"»21142 
021146 



021150 
021154 
021162 
021166 
021172 
021176 
021200 
021204 
021206 



000001 
012767 
012767 
012767 
012767 
012767 



016767 
012767 
005005 



016700 
012701 
004767 
105402 
052705 
042767 
010100 
016701 
004767 
103405 
052705 
000454 



012702 
016767 
016700 
012701 
004 767 
105402 
052705 
010100 
016701 



000001 
177777 
000145 
005262 
011450 



156720 
017712 



161124 
021274 
173054 

100001 
000017 

161072 
175026 

100002 



OOOOIO 
161046 
000104 
021274 
172770 

100001 

000060 



161224 

161212 
163006 
163002 
162776 



161210 
156710 



000146 



000110 



- AORA - 

- REGISTER ADDRESS TEST - 

THIS TEST VERIFIES THAT THE DEVICE REGISTERS WILL RESPOND TO THE PROPER 
UNIBUS HANGSHAKING SIGNALS WHEN ACCESSED. IF THE OHUll DOES NOT RESPOND 
TO THE ACCESS ATTEMPTS (IF THE DHUll IS AT THE WRONG ADDRESS, FOR EXAMPLE) 
THE 004 BUS TIME-OUT TRAP IS DETECTED BY THIS ROUTINE AND AN ERROR 
IS REPORTED. THIS TEST IS PERFORMED ON LINE ONLY. 



.SBTTL HARDWARE TEST 

{*« 

t* 

I* 

1* 

I* 

i* 

I* 

I* 

i* 

t** 

1 - - 



B6NTST 

TNUM ■ 
MOV 
MOV 
MOV 
MOV 
MOV 



TNUM ♦ 1 

*TNUM,TSTNUM 

*-l,CTRLCF 

#101.,ERRNBR 

*EM0103,ERRMSG 

^ROIOI.ERRBLK 



Tl:: 
I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
(SET UP THE TEST NUMBER. CD 

I INDICATE THAT UE ARE IN A TEST. 
(SET THE TEST ERROR NUMBER IN THE TABLE. 
I SET UP THE TEST FAILURE MESSAGE IN THE TABLE 
I SET -l.jp THE ERROR ROUTINE IN THE ERROR TABLE. 



I SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 

MOV 4.TP4VEC 

MOV OTP4RTN,4 

CLR R5 

! HERE BEGINS THE LOOP TO TEST THE REGISTERS FOR A LINE. 

t FIRST TEST THE CSR AND SET THE INO.ADR.REG (I.A.R) FIELD. 

I - 



I SAVE THE EXISTING 004 TRAP VECTOR. 

J SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 

(CLEAR THE ERROR FLAGS. 





MOV 


CSRA.RO 




MOV 


<>52t.Rl 




JSR 


PC, CK TRAP 




BCS 


41 




BIS 


dlOOOOl.RS 


4$: 


BIC 


«17.52$ 




MOV 


Rl.RO 




MOV 


CSRA.Rl 




JSR 


PC.CKTRAP 




BCS 


6t 




BIS 


<H 00002. R5 




BR 


40i 




NOW. UE 


TEST EACH REGIS 


J - 
6$: 


MOV 


08. .R2 




MOV 


CSRA.50I 


8t: 


MOV 


501, RO 




MOV 


052S,R1 




JSR 


PC.CKTRAP 




BCS 


10$ 




BIS 


0100001. R5 


10$: 


MOV 


Rl.RO 




MOV 


50$. Rl 



(SET UP CSR AS THE CKTRAP MOVE SOURCE. 

(SET UP DESTINATION LOCATION FOR CKTRAP MOVE. 

(MOVE AND CHECK FOR TRAP. 

I IF NO TRAP, BYPASS ERROR. 

(SET FATAL READ ERROR FLAGS. 

(CLEAR THE I.A.R FIELD OF THE CSR DATA. 

(USE OLD DESTINATION FOR SOURCE OF CKTRAP MOVE. 

(SET UP CSR AS THE CKTRAP MOVE DESTINATION. 

(MOVE AND CHECK FOR TRAP. 

(IF NO TRAP, BYPASS ERROR. 

(SET FATAL WRITE ERROR FLAGS. 

(EXIT AND REPORT FATAL ERROR. 

FOR THIS LI^*E. 

;INIT REGISTER COUNTER TO 8. 

(INITIALIZE THE REGISTER POINTER. 

(SET UP REGISTER AS THE SOURCE FOR CKTRAP MOVE. 

(SET UP LOCAL STORAGE AS THE DES FOR CKTRAP. 

(PERFORM THE MOVE. CHECK FOR TRAP. 

(IF NO TRAP. BYPASS THE SETTING OF ERROR FLAGS. 

(SET FATAL READ ERROR FLAGS. 

(USE OLD DEST AS SRC FOR CKTRAP MOVE. 

(SET UP REGISTER AS THE DEST FOR CKTRAP MOVE, 



Fli 
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SEQ 135 



4955 
4956 

4957 
4958 
4959 
4960 
4961 
4962 
4963 
4964 
4965 
4966 
4967 
4968 
4969 
4970 
4971 
4972 
4973 
4974 

4975 
4976 
4977 



4978 
4979 

4980 
4981 
4982 
4983 
4984 
4985 
4986 
4987 
4988 



021212 
021216 
021220 
021224 
021230 
021234 
021236 



021240 
021246 
021250 



021252 
021252 



0212S4 
021254 
021260 
021262 
021266 
021266 
021270 



021272 
021274 



021276 
021302 
021302 
021302 



004767 172750 

103402 

052705 100002 

005267 000042 

005267 000036 

005302 

001351 



104444 
000402 



000000 
000000 



12$; 



I •■ 



JSR PC.CKTRAP 

BCS 121 

BIS #100002, R5 

INC 50$ 

INC 50$ 

DEC R2 

BNE 8$ 



(PERFORM THE MOVE, CHECK FOR TRAP. 

I IF NO TRAP. BYPASS THE SETTING OF ERROR FLAGS 

(SET FATAL WRITE ERROR FLAGS. 

I INCREMENT THE REGISTER 

t POINTER BY 2. 

I COUNT THE REGISTER. 

;LOOP TO TEST THE NEXT REGISTER ADDRESS. 



t DONE CHECKING DEVICE REGISTER ADDRESSES, 
t REPORT ANY ERRORS AND EXIT. 
I - 



016767 161032 156536 

005705 

100012 



104460 



016700 160744 

104451 

005067 160762 



40$: 



MOV 


TP4VEC,4 


TST 


R5 


BPL 


60$ 



(RESTORE THE NORMAL 004 TRAP VECTOR. 
(CHECK THE ERROR FLAGS. 
(EXIT ROUTINE IF NO ERRORS. 



t- 



REPORT "DEVICE REGISTER ACCESS TEST FAILED" 
ERROR 



TRAP 



DODU 



CLR 
DOCLN 

BR 



UNITN 

CTRLCF 

60$ 



(DROP THIS l*NIT FROM FUTHER TESTING. 

MOV 
TRAP 

(INDICATE NO CTRL-C ABORT FROM TEST. 

(ABORT THIS SUB PASS. 

TRAP 



C$ ERROR 



UNITN, RO 
C$OODU 



C$DCLN 



)********«*«**4i** LOCAL STORAGE. ********4>**«**********4>***«*a************ 
50$: .WORD (STORAGE FOR THE SOURCE OR DEST OF Th€ CKTRAP MOVE. 
52$: .WORD (STORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 



005067 160746 



104401 



60$: CLR CTRLCF 
ENDTST 



(INDICATE THAT WE ARE NOT WITHIN A TEST, 

L 10026: 

TRAP C$ETST 



Gil 
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SEQ 136 



4990 
4991 
4992 
4993 
4994 
4995 
4996 
4997 
4998 

4999 



5000 

5001 

5002 

5005 

5004 

5005 

5006 

5007 

5008 

5009 

5010 

5011 

5012 

5013 

5014 

5015 

5016 

5017 

5018 

5019 

5020 

5021 

5022 

5023 

5024 

5025 

5026 

5027 

5028 

5029 

5030 

5031 

5032 

5033 

5034 

5035 

5056 

5037 

5058 

5039 

5040 

5041 

5042 

5043 



021304 
021304 
021304 
021304 
021310 

021312 
021320 
021326 
021534 
021342 
021350 



021356 
021562 



021570 
021374 
021400 
021404 
021410 
021414 



021420 
021424 
021426 
021454 
021456 
021440 
021442 
021446 



012700 
104441 
000002 
012767 
012767 
012767 
012767 
012767 
012767 



000240 



000002 
177777 
000001 
007641 
005403 
013136 



004767 172634 
103145 



021364 004767 173160 



016705 
012700 
004767 
012700 
004767 
004767 



016705 
005001 
012767 
000241 
006005 
105112 
004 767 
103113 



160624 
000204 
176146 
177670 
176166 
175502 



160574 
007642 

173722 



160734 
160722 
162514 
162510 
162504 
162500 



.SBTTL HARDWARE TEST - DMASTA - 



;* 

!* 



- DMA START BIT TEST - 
THIS TEST VERIFIES THAT THE DMA START BIT IN THE DUT ' S LINE CONTROL 
REGISTERS WILL INITIATE DMA TRANSMISSION ON THE SELECTED LINE. 
THIS TEST IS PERFORMED IN INTERNAL LOOPBACK. ON ALL ACTIVE LINES. 



SETPRI #PRI05 



BGNTST 

T2: : 

(ALLOW LTC INTERRUPTS. 

MOV ^RIOS.RO 
TRAP CJSPRI 

(INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

I SET UP THE TEST NUMBER. (40) 

I INDICATE THAT WE ARE IN A TEST. 

(SET ERROR TYPE AS FATAL IN ERROR TABLE. 

(SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

(SET ERROR MESSAGE ADDRESS IN ERRTBL. 

(SELECT THE CORRECT ERROR REPORTING ROUTINE. 

! RESET THE DUT TO A KNOWN STATE, REMOVE THE STATUS CODES FROM THE FIFO. 
( CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
I THIS SUBROUTINE REPORTS ERROR >>>>> 4001 <<<<<, 



TNUM 


■- TNUM » 1 


MOV 


*TNOM»TSTNUM 


MOV 


0-l.CTRLCF 


MOV 


ftl.ERRTYP 


MOV 


*40C1. .ERRNBR 


MOV 


*EM4001,ERRMSG 


MOV 


*ER9101,ERRBLK 



JSR 
BCC 

JSR 



PC.CLNRST 
50$ 

PC.INDATP 



(RESET THE OHU-11. REPORT ANY ERRORS FOUND. 
(RESET FAILURE?, ABORT THIS TEST. 

(INITIALSE THE 256 BYTE DATA PATTERN. 



I - 



SET INTERNAL LOOPBACK. ENABLE RECEIVER FUNCTIONS ON ALL ACTIVE LINES. 
SET LPR ON ALL LINES TO 38. 4K BAUD, 6 BITS PER CHARACTER, ODD PARITY. 
2 STOP BITS. 
ENABLE TRANSMITTERS ON ALL ACTIVE LINES. 

(PASS THE ACTIVE LINE BIT MAP, 

(PASS THE LNCTRL CONTENTS. 

(INITIALISE THE LNCTRL REGISTERS. 

(PASS THE LPR CONTENTS. 

(INITIALSE THE LPR REGISTERS ON ALL LINES. 

(ENABLE TRANSMITTERS ON ALL LINES. 



( 



162416 2$ 



MOV 


ACTLNS.R5 


MOV 


<^204,R0 


JSR 


PC.WTWLNC 


MOV 


0177670, RO 


JSR 


PC.WTWLPR 


JSR 


PC.TXENBL 


' OUTER 


LOOP TO TEST Tl 


MOV 


ACTLNS,R5 


CLR 


Rl 


MOV 


04002. ,ERRNBR 


CLC 




ROR 


R5 


BCC 


14$ 


JSR 


PC.PUFIFO 


BCC 


50$ 



THE DMA^START BIT ON ALL ACTIVE LINES. 

(GET THE ACTIVE LINE BIT MAP. 

(CLEAR THE LINE NUMBER COUNTER. 

(SET THE ERROR NUMBER TO 4002. 

(CLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 

(SHIFT THE BIT MAP INTO THE CARRY BIT. 

(DO NOT TEST THE LINE IF IT 15 INACTIVE. 

(PURGE THE FIFO. 

(GO REPORT ERROR IF FIFO WILL NOT CLEAR. 



J PERFORM DMA START BIT TESTING ON EACH LINE 
; TEST EACH DMA„START 3lT BEFORE TX' ING DATA 
: SET DMA START BIT ON LUT. VERIFY IT IS SET 
; WAT! FOR DMA TO COMPLETE. 



INDIVIDUALLY. 

PATTERN, REPORT ERROR IF SET 
REPORT ERROR IF CLEAR. 
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SEQ 137 



5044 

5045 

5046 

5047 

5048 

5049 

5050 

5051 

5052 

5053 

5054 

5055 

5056 

5057 

5058 

5059 

5060 

5061 

5062 

5063 

5064 

5065 

5066 

5067 

5068 

5069 

5070 

5071 

5072 

5073 

5074 

5075 

5076 

5077 

5078 

5079 

5060 

5081 

5082 

5083 

5084 

5085 

5086 

5087 

5068 

5089 

5090 

5091 

5092 

5093 

5094 

5095 

5096 

5097 

5098 

5099 

5100 



021450 
021454 
021460 
021464 
021470 



021472 
021476 
021502 
021506 



021510 
021514 
021516 
021522 
021526 
021552 
021534 
021540 
021544 



021546 
021552 
021556 
021562 



021564 
021566 
021572 
021600 
021604 
021606 
021612 
021614 
021616 
021622 
021626 
021650 
021652 
021654 
021656 
021642 



005267 
01270? 
012703 
0047S7 
1030<--* 



005267 
010177 
105777 
100060 



00526 7 
010103 
012701 
016702 
004767 
103045 
012704 
004767 
010301 



005267 
010177 
105777 
100432 



005003 
012704 
012767 
017702 
100021 
012700 
040200 
001007 
005267 
004 767 
005504 
001422 
000757 
005203 
020327 
002753 



162376 
'^02650 
000144 
172710 



162354 
160524 
160534 



162336 

170226 
160500 
175704 

000005 
172516 



162500 
160450 
160460 



000200 

007647 
160424 

170301 



162250 
174652 



000144 



; VERIFY DMA START BIT IS CLEAR. REPORT ERROR IF SET. 

i VERIFY CORRECT N'JMBFR OF CHARS WERE RECEIVED, REPORT ERROR IF < EXPECTED 

INC ERRNBR |SET ERROR NUMBER TO 4003. 

MOV #6UFBAS,R2 iPASS THE START OF THE DATA PATTERN TO TX. 

MOV 01C0..R3 (PASS THE LENGTH OF THE DATA PATTERN. 

JSR PC.DODMA I TRANSMIT THE DATA PATTtRN. 

BCC 12» iGO REPORT ERROR IF OMA^SIART BIT SET. 

: TEST THE STATE OF THE DMA START BIT ON THE LINE UNDER TEST. 
( REPORT ERROR IF DMA.START BIT IS CLEAR. 



4$j 



INC 
MOV 
TSTB 
BPL 



ERRNBR 
Rl.SCSRA 
STXAD2A 
12$ 



I INCREMENT ERROR NUTIBER TO 4004. 
J SELECT THE LINE CURRENTLY UNDER TEST. 
(TEST THE STATE OF THE DMA_START BIT. 
iGO REPORT ERROR IF BIT IS CLEAR. 



WAIT FOR DMA TRANSMISSION TO COMPLETE. 



INC ERRNBR 

MOV R1,R3 

MOV #170226. Rl 

MOV CSRA.R2 

JSR PC.WAIBIS 

BCC 10$ 

MOV #5,R4 

JSR PC. DELAY 

MOV R3,R1 



i INCREMENT ERROR NUMBER TO 4005. 

(SAVE THE LINE NUMBER. 

iTEST BIT 15. TIMECUT OF* 150 MILLI SECS. 

iPASS THE ADDRESS OF" THE REGISTER TO TEST. 

(WAIT FOR DMA TO COMPLETE. 

I GO REPORT ERROR IF TIMEOUT OCCURRED. 

(PASS DELAY OF 5 MILLI SECS. 

iWAIi FOR CHAR TO BE RECEIVED AND PROCESSED, 

tRESTORE THE CURRENT LINE NUMBER, 



( ♦ 



TEST THE STATE OF THE DMA. START BIT ON THE LINE UNDER TEST. 
REPORT ERROR IF DMA^START BIT IS SET. 



; 

1 - 

INC 
MOV 
TSTB 
BMI 



ERRNBR 
Rl.SCSRA 
STXAD2A 
12$ 



; INCREMENT ERROR NUMBER TO 4006. 

iSEuECT THE LINE CURRENTLY UNDER TEST 

jTEST THE STATE OF THE DMA START BIT. 

iGO REPORT ERROR IF BIT IS STILL SET. 



NUMBER OF CHARS EXPECTED. 



VERIFY THE NUMBER OF CHARS RECEIVED 
REPORT ERROR IF COUNT IS INC^ORRECT. 
IF MORE THAN 128 BMP CODES ARE FOUND THEN REPORT ERROR AND EXIT TEST 



162252 6$: 



8$j 



CLR R3 

MOV #128. ,R4 

MOV #4007. .ERRNBR 

MOV SRBUFA.R2 

BPL 12$ 

MOV #1 70301. RO 

BIC R2.R0 

BNE 8* 

INC ERRNBR 

JSR PC.SAVBMP 

DEC R4 

BEQ 50$ 

BR 6$ 

INC R3 

CMP R3.#100. 

BLT 6$ 



I CLEAR THE READ COUNTER. 

;SET UP MAX BMP CODE READ COUNT. 

I SET ERROR NUMBER TO 4007. 

iREAD TK'- CHARACTER FROM THE FIFO. 

tGO REPOfU ERROR IF FIFO EMPTY TOO SOON. 

;StT-UP BIT MASK OF A BMP CODE, 

(TRY TO CLEAR THE BMP CODE MASK. 

I BRANCH IF NOT A BMP CODE. 

J INCREMENT ERROR NUMBER TO 4008. 

I SAVE THE B^»P CODE ON THE QUEUE. 

(DECREMENT MAX BMP CODE READ COUNT. 

iGO REPORT ERROR IF TOO MANY BMP CODES FOUND 

I DO NOT COUNT THE BMP CODE AS A VALID CHAR. 

(COUNT THIS CHARACTER. 

(HAVE WE RECIEVED 100 CHARACTERS?. 

(LOOP UNTIL 100 (N0N-8MP) CHARS ARE READ, 



1 1 1 
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SEQ 138 



5101 


021644 


000410 




5102 








5103 








5104 








5105 








5106 


021646 


010501 




510? 








5108 


021650 


012702 


005435 


5109 








5110 


021654 








021654 


104460 




5111 








5112 








511? 








5114 








5115 


021656 


052767 


000100 160324 


5116 


021664 


001406 




5117 








5118 


021666 


005201 




5119 


021670 


005705 




5120 


021672 


001255 




5121 


021674 


000402 




5122 








5123 


021676 


004 767 


174770 


5124 


021702 


005067 


160342 


5125 








5126 


021706 
021706 
021706 


104401 





BR 



I * 



14$ 



(SKIP AROUND THE ERROR REPORT. 



: REPORT ERROR, SKIP FURTHER TESTING ON THIS LINE, 

(RESTORE THE CURRENT LINE NUMBER. 

(PASS THE ERROR MESSAGE TO BE REPOTTED. 
I "DMA_START BIT BAD ON LINE NN". 
J >>i>> ERROR <<<<<, 

TRAP 

i EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



10$: 


MOV 


R3,R1 


12$: 


MOV 
ERROR 


#EM4002,R2 



C$ERROR 





BIT 
BEQ 


#6IT06. OPTION 
60$ 


14$: 


INC 
TST 

BNE 

BR 


Rl 
R5 
2$ 

60$ 


50$: 
60$: 


JSR 
CLR 


PC.TSABRT 
CTRLCF 



lEXIT WITH TEST FAILURE MESSAGE IF 

I NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

I INCREMENT THE LINE NUMBER COUNTER. 

I ARE THERE ANY MORE ACTIVE LINES TO TEST?. 

lYESi BRANCH TO TEST THE NEXT LINE. 

tNOi EXIT THIS TEST. 

;REPORT TEST ABORTED. NON-TEST RELATED ERROR. 
rtiAiOICATE THAT WE ARE NOT WITHIN A TEST. 



ENDTST 



L 10027: 



TRAP 



C$ETST 



CZDHVBO OHUll 
HARDWARE TEST 



5128 
5U^9 
5130 
5151 
5152 
5135 
5134 
5135 
5156 
5137 
5138 



FUNC TST 



5139 



5140 

5141 

5142 

5143 

5144 

5145 

5146 

5147 

5148 

5149 

5150 

5151 

5152 

5153 

5154 

5155 

5156 

5157 

5155 

5159 

5160 

5161 

5162 

5163 

5164 

516!: 

5166 

5167 

5168 

5169 

5170 

5171 

5172 

5173 

5174 

5175 

5176 

5177 

5178 

5179 

5180 

5181 



021710 
021710 
021710 
021710 
021714 

021716 
021724 
021732 
021740 
021746 
021754 



012700 
104441 
000003 
012767 
012767 
012767 
012767 
012767 
012767 



021762 
021766 



004767 
103164 



021770 004767 



021774 
022000 
022004 
022010 
022014 
022020 



022024 
022030 
022032 
022040 
022042 
022044 
022046 
022052 



016705 
012700 
004767 
012700 
004 767 
004767 



016705 
005001 
012767 
000241 
006005 
103127 
004767 
103130 



PART 2 MACRO 
- DMABRT - 
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SEQ 139 



000240 



000003 
177777 
000001 
010005 
005471 
013136 



172230 
172554 



160^20 
000;^;04 

17534.'> 
.1. ".070 
175562 
175076 



160170 
010006 

173316 



.SBTTL HARDWARE TEST - DMABRT - 

- DMA ABORT/RESTART TEST - 

THIS TEST VERIFIES THAT EACH DMA ABORT BIT WILL CORRECTLY HALT 

A DMA TRANSMISSION, AND RETURN A TX.ACTION. 
I* IT WILL ALSO VERIFY THAT THE ABORTED DMA TRANSMISSION CAN BE RESUMMED, 
J* AND THAT A TX ACTION IS RETURNED UPON COMPLETION. 

THIS TEST IS PERFORMED IN INTERNAL LOOPBACK. ON ALL ACTIVE LINES. 

BGNTST 



160330 
160316 
162110 
162104 
162100 
162074 



SETPRI <>PRI05 



TNUM ■- TNUM ♦ 1 

MOV #TNUM,TSTNUM 

MOV 0-l,CTRLCF 

MOV *1.ERRTYP 

MOV #4101..ERRNBR 

MOV *£M4101,ERRMSG 

MOV #€R9101.ERRBLK 



T3:: 
(ALLOW LTC INTERRUPTS. 

MOV *PRI05,RO 
TRAP CJSPRI 
» INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
fSET UP THE TEST NUMBER. C41) 
» INDICATE THAT WE APE IN A TEST. 
iSF.T EPHOR TYPE AS FATAL IN ERROR TABLE. 
jSET THE FIRST ERROR NUMBER IN ERROR TABLE. 
(SET ERROR MESSAGE ADDRESS IN ERRTBL. 
i SELECT THE CORRECT ERROR REPORTING ROUTINE. 



i ♦ 



RESET THE DUT TO A KNOWN STATE, REMOVE THE STATUS CODES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >•>>>> 4101 <<<<<, 



JSR 
BCC 

JSR 



PC.CLNRST 
60$ 

PC.INDATP 



jRESET THE DHU-11. REPORT ANY ERRORS FOUND. 
(RESET FAILURE?, ABORT THIS TEST. 

(INITIALISE 256 BYTE DATA PATTERN. 



; SET INTERNAL LOOPBACK. ENABLE RECEIVER FUNCTIONS ON ALL ACTIVE LINES. 
( SET LPR ON ALL LINES TO 38. 4K BAUD, 8 BITS PER CHARACTER, ODD PARITY, 
! 2 STOP BITS. 
( ENABLE TRANSMITTERS ON ALL ACTIVE LINES. 

(PASS THE ACTIVE LINE BIT HAP. 

(PASS THE LNCTRL CONTENTS. 

(INITIALISE THE LNCTRL REGISTERS. 

(PASS THE LPR CONTENTS. 

lINITIALSE THE LPR REGISTERS ON ALL LINES. 

(ENABLE TRANSMITTERS ON ALL LINES. 



162012 2J: 



MOV 


ACTLNS,R5 


MOV 


#204, RO 


JSR 


PC.WTWLNC 


MOV 


«177670,RO 


JSR 


PC.WTWLPR 


JSR 


PC.TXENBL 


M DMA 


.ABORT BIT TESTI 


MOV 


ACTLNS.R5 


CLR 


Rl 


MOV 


«4102..ERRNBR 


uLC 




ROR 


R5 


BCC 


10$ 


JSR 


PCPUFIFO 


BCC 


50$ 



(GET THE ACTIVE LINE BIT MAP. 

(CLEAR THE LINE NUMBER COUNTER. 

(SET THE ERROR NUMBER TO 4102. 

(CLEAR THE CARRY BIT PRIOR TO SHIFIING BIT MAP. 

(SHIFT THE BIT MAP INTO THE CARRY SIT. 

(DO NOT TEST THE LINE IF IT IS INACTIVE. 

(PURGE THE FIFO. 

(GO REPORT ERROR IF FIFO WILL NOT CLEAR. 

l' CHECK THE DMA. ABORT BIT BEFORE ENABLING DMA, REPORT ERROR IF SET. 
1 - 



Kll 
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SEQ 140 



5182 022054 


005267 


161772 


5183 022060 


010177 


160142 


SI 84 022064 


03277 7 


000001 160144 


5185 022072 


001105 




5186 






5187 






5188 






5189 






5190 022074 


005267 


161752 


5191 022100 


012702 


002650 


5192 022104 


012703 


000400 


5193 022110 


004767 


172264 


5194 022114 


103107 




5195 






5196 






5197 






5198 022116 


010177 


160104 


5199 022122 


012704 


000050 


5200 022126 


004767 


172130 


5201 022132 


052777 


000001 160076 


5202 






5205 






3204 






5205 022140 


005267 


161706 


5206 022144 


010103 




5207 022146 


012701 


3 70012 


5208 022152 


016702 


160v:S0 


5209 022156 


004767 


\75.>r>''. 


5210 022162 


103050 




5211 022164 


010301 




5212 






5215 






5214 






5215 022166 


005267 


161660 


5216 022172 


012702 


005557 


5217 






5218 022176 


010177 


160024 


5219 022202 


105/77 


160034 


5220 022206 


100441 




5221 






5222 






5225 






5224 022210 


042777 


000001 160020 


: *^25 022216 


052777 


000200 160016 


5226 






5227 






5228 






5229 022224 


005267 


161622 


5230 022230 


010103 




5231 022232 


012701 


170536 


5232 022236 


016702 


157764 


5235 022242 


004767 


175170 


5234 022246 


103016 




5235 022250 


012704 


000002 


5236 022254 


004 767 


172002 


5237 022260 


010301 




5258 







ERRN8R 
Rl.QCSRA 
*BIT0,6)LNCTRA 
6$ 



I INCREMENT ERROR NUMBER TO 4103. 
(SELECT THE LINE CURRENTLY UNDER TEST 
(TEST THE STATE OF THE OMA^ABORT BIT. 
J GO REPORT ERROR IF BIT IS SET. 



DMA TX ON SELECTED LINE. WAIT FOR DMA TO TX APPROX 1/4 OF DATA 
THE DMA TRANSMISSION. UAIT FOR TX.ACTION TO BE RETURNED. 



J - 



INC 
MOV 
BIT 
BNE 

ENABLE 
ABORT 

INC 
MOV 
MOV 
JSR 
BCC 

i * 

1 WAIT 

MOV 
MOV 
JSR 
BIS 

!*WAIT FOR TX.ACTION TO BE RETURNED, REPORT ERROR IF TIME-OUT OCCURS 



ERRN6R 
*6UFBAS.R2 
«256. .R3 
PC.DOOMA 
50 1 



tSET ERROR NUMBER TO 4104. 

(PASS THE START OF THE DATA PATTERN TO TX. 

I PASS THE LENGTH OF THE DATA PATTERN. 

J TRANSMIT THE DATA PATTERN. 

I GO REPORT ERROR IF THERE ARE TX PROBLEMS. 



FOR DMA TO TRANSMIT 1/4 OF THE DATA BEFORE ABORTING. 



Rl.SCSRA 
*40. .R4 
PC. DELAY 
^BITO.QLNCTRA 



(SELECT THE LINE CURRENTLY 'JNDER TEST. 
(PASS THE DELAY TIME OF 40 MILLI SECONDS 
iWAIT FOR AOPROX 1/4 OF DATA TO BE TX'D. 
(ABORT THE DMA TRANSMISSION. 



INC ERRNBR 

MOV R1.R3 

MOV *170012.R1 

MOV CSRA,R2 

JSR PC.WAIBIS 

BCC 4$ 

MOV R3.R1 



(INCREMENT ERROR NUMBER TO 4105. 

(SAVE THE LINE NUMBER. 

(TEST BIT 15, TIMEOUT OF 10 MILLI SECS. 

(PASS THE ADDRESS OF THE REGISTER TO TEST 

(WAIT FOR DMA TO COMPLETE. 

I GO REPORT ERROR IF TIMEOUT OCCURRED. 

.RESTORE THE CURRENT LINE NUMBER. 



( VERIFY DMA, START BIT CLEAR, REPORT ERROR IF SET. 



INC 

MOV 

MOV 
TSTB 

QMI 



ERR^iBR 
*EM4103,t^2 

Rl.aCSRA 

aTXAD2A 

8J 



(INCREMENT ERROR NUMBER TO 4106. 

(SELECT MESSAGE TO BE REPORTED. 

1 "DMA START BIT FOUND SET AFTER DMA ABORTED" 

(SELECT THE LINE CURRENTLY UNDER TEST. 

(TEST THE STATE OF THE DMA START BIT. 

(GO REPORT ERROR IF IT IS SET. 



; RESUME DMA TRANSMISSION BY CLEARING DMA_A80RT AND SETTING DMA, START, 

BIC *6IT0,aLNCTRA (CLEAR THE DMA_ABORT BIT. 
BIS ^IT7.STXAD2A (SET THE DMA„START BIT. 

( WAIT FOR DMA TRANSMISSION TO COMPLETE. 

(INCREMENT ERROR NUMBER TO 4107. 

(SAVE THE LINE NUMBER. 

(TEST BIT 15. TIMEOUT OF 350 MILLI SECS. 

(PASS THE ADDRESS OF THE REGISTER TO TEST. 

(WAIT FOR DMA TO COMPLETE. 

sGO REPORT ERROR IF TIMEOUT OCCURRED. 

(PASS TIME OUT OF 2 MILLI SECS, 

(WAIT FOR CHAR TO BE RECEIVED AND PROCfciiSEU. 

(RESTORE THE CURRENT LINE NUMBER. 



( - 




INC 


F.RRNBR 


MOV 


R1.R3 


MOV 


#170536, Rl 


MOV 


CSRA.R2 


JSR 


PC.WAIBIS 


BCC 


4$ 


MOV 


d2,P4 


J'^R 


PC, DELAY 


MOV 


R3.R1 



Lll 
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SEQ 141 



5239 
5240 
5241 
5^42 
5243 
5244 
5245 
5246 
5247 
5248 
5249 
5250 
5251 
5252 
5253 
5254 

5255 
5256 
5257 
5258 
5259 
5260 
5261 
5262 
5263 
5264 
5265 
5266 
5267 
5268 
5;.'69 
5270 
5271 
5272 
5273 



022262 
022266 
022272 
022300 
022302 



022306 

022312 
022312 



022314 
022322 



022324 
022326 
022330 
022332 

022334 
022340 

022344 
022344 
022344 



005267 
010177 
032"77 
001002 
000410 



TEST THE STATE OF THE DMA ABORT BIT ON THE LINE UNDER TEST. 
REPORT ERROR IF DMA_AB0RT BIT IS SET. 



161564 
157734 
000001 



157736 



ERRNBR 

Rl.aCSRA 

<>eiT0.OLNCTRA 

6$ 

10$ 



022304 010301 

012702 005523 



4$ 
6$ 
8$ 



INC 

MOV 

BIT 
8NE 
BR 

J REPORT ERROR, SKIP FURTHER TESTII'^G ON THIS LINE. 
I - 



I INCREMENT ERROR NUMBER TO 4108. 

I SELECT THE LINE CURRENTLY UNDER TEST. 

I TEST THE STATE OF THE DMA.ABORT BIT. 

iGO REPORT ERROR IF BIT IS SET. 

: BRANCH TO CHECK FOR ANY MORE LINES TO TEST. 



MOV 

MOV 

ERROR 



R3,R1 
ffEM4102,R2 



104460 



032767 000100 157666 
001406 



005201 
005705 
001240 
000402 

004767 174332 
005067 157704 



104401 



I RESTORE THE CURRENT LINE NUMBER. 

jPASS THE ERROR MESSAGE TO BE REPORTED. 
; "DMA.ABORT BIT BAD ON LINE NN". 
t >>>>> ERROR <<<<< . 

TRAP 



C$ERROR 



; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

BIT ^>eiT06, OPTION (EXIT WITH TEST FAILURE MESSAGE IF 
BEQ 60$ I NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

J DURING Ti.- SOFTWARE QUESTIONS. 

VERIFY ALL ACTIVE LINES HAVE t^EEN TESTED. 

10$: 



50$ 
60$ 



INC 

TST 
BNE 
BR 

JSR 
CLR 

ENOTST 



Rl 
R5 
25 
60$ 

PC.TSABRT 
CTRLCF 



I INCREMENT THE LINE NUMBER COUNTER. 

jARE THERE ANY MORE ACTIVE LINES TO TEST?. 

jYESj BRANCH TO TEST THE NEXT LINE. 

tUOi EXIT THIS TEST. 

;REPORT TEST ABORTED. NON-TEST RELATED ERROR. 
; INDICATE THAT WE ARE NOT WITHIN A TEST. 



L 10030: 



TRAP 



C$ETSr 



Mil 
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SEQ 142 



5275 
5276 
5277 
5278 
5279 
5280 
5281 
5282 
5285 
5284 
5285 
5286 
5287 
5288 

5289 
5290 



5291 

5292 

5293 

52S4 

5295 

529\S 

529? 

5296 

5299 

5300 

5301 

5302 

5303 

5304 

5305 

5306 

5307 

5308 

5309 

5310 

5311 

5312 

5313 

5314 

5315 

5316 

5317 

5318 

5319 

5320 

5321 

5322 

5323 

5324 

5325 

5326 

5327 

5528 



022346 
022546 

022346 
022346 
022352 



022354 
022362 
022370 
022376 
022404 
022412 



022420 
022424 



022426 
022432 
022434 
02.2*\36 
0^2442 
022446 
022452 
022456 



022462 
022466 
022474 



012700 
104441 

000004 
012767 
012767 
012767 
012767 
012767 
012767 



004767 
103115 
010104 
012700 
004767 
012700 
004767 
004767 



005267 
0327/? 
001072 



000240 



000004 
177777 
000001 
010151 
005643 
011762 



157672 
157660 
16145? 
161446 
161442 
161436 



004767 171572 
103120 



172036 



000204 
175104 
177670 
175124 
174440 



161364 
000200 



157546 



.IiBTTL HARDWARE TEST - OMAERR - 



- DMA ERROR BIT TEST - 
THIS TEST VERIFIES THAT THE TX. DMA. ERROR BIT IN THE CSR IS 
FUNCTIONING CORRECTLY. THE DMA ERROR IS FORCED BY MAKING THE DUT 
ATTEMPT TO PERFORM A DMA TRANSFER FROM THE ADDRESS OF ITS OWN CSR. 
SINCE THE DEVICE CANNOT BE BOTH A BUS MASTER AND SLAVE AT THE SAME 
TIME, TIMEOUT WILL OCCUR WAITING FOR THE APPROPRIATE HANDSHAKE SIGNAL 
FROM THE DMA ADDRESS. 
THIS TEST IS PERFORMED IN INTERNAL LOOPBACK. 



;* 
t* 
i* 

t* 
J* 
i* 
;♦ 

!♦ 

I* 

8GNTST 



T4:: 



SETPRI «PRI05 



TNUM -- TNUM ♦ 1 

MOV OTNUM.TSTNUM 

MOV *-l.CTRLCF 

MOV *1,ERRTYP 

MOV *4201..ERRNBR 

MOV *EM4201.ERRMSu 

MOV *ER0503 , ERRBLK 



;ALLOW LTC INTERRUPTS. 



MOV 
TRAP 



*PR I05.ro 
CJSPRI 



INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
(SET UP THE TEST NUMBER, C42) 
(INDICATE THAT WE ARE IN A TEST. 
(SET ERROR TYPE AS FATAL IN ERROR TABLE. 
(SET THE FIRST ERROR NUMBER IN ERROR TABLE. 
(SET ERROR MESSAGE ADDRESS IN ERRTBL. 
(SELECT THE CORRECT ERROR REPORTING ROUTINE 



I* 



RESET THE DUT TO A KNOWN STATE. REMOVE THE STATUS CODES FROM THE FIFO. 
; CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
( THIS SUBROUTINE REPORTS ERROR •>>>>> 4201 *<<<<. 

JSR PC.CLNRST (RESET THE DHU-11. REPORT AN> ERRORS FOUND 



BCC 



60J 



(RESET FAILURE?. ABORT THIS TEST. 



I SET INTERNAL LOOPBACK. ENABLE RECEIVER FLINCTIONS ON ALL LINES. 

i SET LPR ON ALL LINES TO 38. 4K BAUD, 8 BITS PER CHARACTER. ODD PARITY. 

J 2 STOP BITS. 

! ENABLE TRANSMITTERS ON ALL LINES. 

(FIND AN ACTIVE LINE. 

(EXIT THE TEST IF NO ACTIVE LINES. 

(SAVE THE LINE NUMBER. 

(PASS THE LNCTRL CONTEN' S. 

(INITIALISE THE LNCTRL F'EGISTERS. 

(PASS THE LPR CONTENTS. 

iIMTIALSE THE LPR REGISTERS ON THE ACTIVE LINE 

(ENAHLE TRANSMITTERS ON THE ACTIVE LINE. 



(SET THE ERROR NUMBER TO 4202. 

(TESl THE DMA START BIT. 

iBRAKCM TO REPORT THE ERROR IF THE BIT IS ^ET. 

! SET UP THE DMA REGISTERS TO PERFORM THE TRANSFER FROM THE ADDRESS OF THE CSR. 



JSR 


PC.FINACT 


BCC 


60* 


MOV 


R1,R4 


MOV 


<^204,R0 


JSR 


PC.WTWLNC 


MOV 


«177670.R0 


JSR 


PC.WTWLPR 


JSR 


PC.TXENBL 


THAT 


THE DMA. ST ART BI 


INC 


ERRNBR 


BIT 


<«IT07,aTXAD2A 


BNE 


50$ 



Nil 
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SEQ 143 



5329 
5330 
5331 
5332 
5333 
5334 
5335 
5336 
5337 
5338 
5339 
5340 
5341 
5342 
5343 
5344 
5345 
5346 
5347 
5348 
5349 
5350 
5351 
5352 
^53 
-J 354 
5355 
5356 
5o57 
5356 
5359 
5360 
5361 
5362 
5363 
5364 
5365 
5366 
5367 
5568 

5369 
5370 
5371 
5372 
5373 
5374 



022476 
022504 
022512 
022520 
022524 
022530 
022534 
022540 



022542 
022546 
022554 
022556 
022562 
022570 



022572 
022574 
022600 
022604 
022610 
022614 
022616 
022622 
022626 
022632 
022636 
022640 
022644 
0226j0 



022656 
022656 
022660 

022662 
022666 

022672 
022672 
022672 



016777 
012777 
112777 
012701 
016702 
005267 
004767 
103050 



005267 
032777 
001436 
005267 
032777 
001034 



010401 
012702 
012703 
005267 
004767 
103022 
012701 
016702 
005267 
004767 
103011 
005267 
032702 
001406 



104460 
000402 

004767 
005067 



104401 



157524 
OOOOOl 
000203 
170012 
157476 
161316 
174676 



161304 
010000 

161270 
000200 



002650 
OOOOOl 
161242 
171564 

170036 
157400 
161220 
174600 

161206 
010000 



022652 012701 005675 



174004 
157356 



157534 
157532 
.157522 



MOV CSRA.aTXADlA 

MOV «1,QTXBFCA 

MOVB *203,aTXAD2A 

MOV *170012,R1 

MOV CSRrt.R2 

INC ERRNBR 

JSR PC.WAIBIS 

BCC 501 



:SET UP THE LOW 16 BITS Of THE DMA ADDR . 

»SET UP TO DMA ONE CHARACTER. 

iSET UP THE 2 MSB'S AND INITIATE THE DMA 

iTEST BIT 15, TIME OUT OF 10 MS. 

1 INDICATE TO TEST THE C5R. 

iSET THE ERROR NUMBER TO 4203. 

iWAIT FOR A TX ACTION. 

i REPORT THE ERROR IF NO TX -ACTION. 



VERIFY THAT THE DMA ERROR BIT IS SET AND THE DMA START BIT IS CLEAR. 



157452 
157452 



INC ERRNBR 

BIT <«IT12,SCSRA 

BEQ 2$ 

INC ERRNBR 

BIT WIT07,STXAD2A 

BNE 50* 



iSET THE ERROR NUMBER TO 4204, 

iTEST THE DMA ERROR BIT. 

^REPORT THE ERROR IF BIT IS CI F'^'-- 

J SET THE ERROR NUMBER TO 4205. 

(TEST THE DMA-START BIT. 

; REPORT THE ERROR IF THE BIT IS SET 



VERIFY THAT THE DMA ERROR BIT CL! ARS UHEN A "GOOD" DMA TRANSFER IS PERFORMED 



MOV R4.R1 

MOV <^6UFBAS,R2 

MOV «1,R3 

INC ERRNBR 

JSR PC.DODMA 

BCC 501 

MOV *170036.R1 

MOV CSRA,R2 

INC ERRNBR 

JSR PC.WAIBIS 

BCC 50$ 

INC ERRNBR 

BIT WIT12,R2 

BEQ 60i 



;SET UP THE ACTIVE LINE NUMBER. 

I SET UP THE STAfVT ADDRESS OF THE DMA BUFFER. 

iSET UP TO DMA ONE CHARACTER. 

iSET THE ERROR NUMBER TO 4206. 

(START THE DMA. 

J REPORT THE ERROR IF ONE OCCURLO. 

iSET UP TO TEST BIT15 WITH TIMEOUT OF 30 MS. 

(INDICATE TO TEST THE CSR. 

(SET THE ERROR NUMBER TO 4207. 

(WAIT FOR A TX-ACTION. 

(REPORT THE ERROR IF NO TX-ACTION OCCURED. 

(SET THE ERROR NUMBER TO 4208. 

(TEST THE DMA ERROR BIT OF THE LAST CSR WORD READ 

(EXIT THF TEST IF THE BI^ IS CLEAR. 



REPORT THE ERROR, DMA ERROR BIT BAD. 



50$ : 
60$: 



MOV 

ERROR 

BR 

JSR 
CLR 

ENDTST 



0EM4202.RI 



60$ 

PC, fSMBRT 
CTRLCF 



(SET THE MESSAGE 

I "DMA ERROR OIT BAD" 



(EXIT THE TEST. 



TRAP 



C$ERROR 



(REPORT THE NON-RELATED TEST ERROR. 
(INDICATE THAT WE ARE NOT WITHIN A TEST. 



L10031; 



TRAP 



C$tTST 



B 1 .'. 
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SEQ 144 



C/D 
HAR 



S576 








5577 








5?r8 








5579 








5560 








5581 








558^ 








5585 








5584 








5585 








5586 








558 7 02^^..:A 








02^674 








5588 0^2674 


126'2^ 


157522 


000002 


5589 022702 


001402 






5590 022704 


000167 


000556 




5591 022710 








022710 


012700 


000240 




022714 


104441 






5592 


000005 






5595 022716 


012767 


000005 


157550 


5594 022 724 


012767 


177777 


157516 


5595 022752 


012767 


OOOOOl 


161110 


5596 022740 


012767 


011445 


161104 


5597 022746 


012767 


005717 


161100 


5598 022754 


012767 


015156 


161074 


5599 








5400 








5401 








5402 








5405 








5404 022/62 


004 76 7 


171?50 




5405 022 766 


105402 






5406 022770 


000167 


000472 




540 : 








5408 








5409 








5410 022774 


004 767 


170442 




5411 








5412 








5415 








5414 








5415 








5416 








5417 025000 


016^05 


157214 




5418 025004 


012700 


OO00O4 




5419 025010 


004 767 


174556 




5420 025014 


012705 


177777 




5421 02 5020 


012700 


177670 




54?? 025024 


004 767 


174552 




5425 025050 


004 767 


174066 




5424 








542S 








5426 








542 7 02 5054 


012705 


lOOOOO 




54?fl 025040 


016 /O'j 


15 7154 




54;j9 023044 


046705 


1572 It? 





.SBTTL HARDWARE TEST 



- OAUTOI - 
OAUTO BIT INACTIVE TEST 



CMPB 


L0PBCK.02 


BEQ 


. •& 


JMP 


601 


SETPRI 


#PRI05 


TNUM - 


• TNUM ♦ I 


MOV 


♦ TNUM.TSTNUM 


MOV 


♦l.CTRLCr 


MOV 


♦l.ERflTYP 


MOV 


#4901. .ERRNBR 


MOV 


#CM490X,ERRMSG 


MOV 


#€R9101.ERRBLK 



THIS TEST VERIFIES THAT THE OUT'S OAUTO FUNCTION BEHAVES CORRECTLY 
WHEN INACTIVE, IE OAUTO BIT CLEAR. 

THIS TEST WILL ONLY EXECUTE IF STAGGERED LOOPBACK MODE IS SELECTED. 
THE SPECIAL STAGGERED LOOPBACK CONNECTOR MUST BE FITTED. 

BGNTST 

T5: ! 
iCHECK MOOE SELECTED. 

iDO NOT EXIT IF STAGGERD LOPBCK MOOE SELECTED. 
lEXIT THIS TEST. 
lALLOW LTC INTERRUPTS, 

MOV *PRI05,R0 

TRAP CISPRI 

(INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
iSET UP THE TEST NUr«ER . (49) 

I INDICATE THAT WE ARE IN A TEST. 
iSET ERROR TYPE AS FATAL IN ERROR TABLE. 
iSET ERROR NUMBER TO 4901. 
I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
iSELECT THE CORRECT ERROR REPORTING ROUTINE. 

I RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 
I CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
I THIS SUBROUTINE REPORTS ERROR »>^»> 4901 <<<<<. 

iRESET THE OMU 11. REPORT ANt fRRORS FQUNO. 
iDO NOT EXIT If RESET WAS SUCCESSFUL. 
(EXIT THIS TEST. 

SET-UP THE ASSOCIATED TX/RX LINE NUMBf R TABLtS. 

JSR PC.ASLNTL iINHIALlSE THE ASSOCIATED TX/RX TABLES. 

SET EXTERNAL lOOPBACK. DISABLE OAUTO AND ENABLE RECEIVER ON ALL ACTIVE LINES. 

SET LPR ON ALL LINES TO 58. 4K BAUD, 8 BITS PER CHARACTER, 000 PARITt, 

2 STOP BITS. 

ENABLE TRANSMITTERS ON ALL LINES. 

iPASS THE ACTIVE LINE BIT MAP. 

iPASS THE LNCfRL CONTENTS. 

iINITIAlISE THE LNCTRL REGISTERS. 

iPASS BIT MAP OF ALL LINES. 

iPASS !►€ LPR CONTENTS. 

iINlTIALSE TK LPR REGISTERS ON AU LlNtSt 

lENABLE TRANSMITTERS ON ALL LINES. 

i SET UP DiiTER LOOP FOR TESTING ACTIVE LINES IN BOTH LINE GROUPS, 

MOV C100000.R5 r'»t T UP LOOP CONTROL FiAu. 

MOV ACTINS.R5 (GET THE ACTIVE LjNf BIT MAP, 

UlC tURP2M,R5 iRtHUVt UlNLS IN UROUP J, 



JSR 


PC.CLNR5T 


BCS 


. *6 


JMP 


60 1 



MOV 


ACTLNS.R5 


MOV 


M.RO 


JSR 


PC.WTWINC 


MOV 


^APlNS.R5 


MOV 


♦177670, RO 


JSR 


PC.WTWIPR 


JSR 


PC.TXEN6L 



Clc.^ 



C/DHVHO DHMll 1 


ruNC TST 


PART 2 


MACRO M1200 


15 


•MAR -84 


09:28 PAGE 109 


•1 


HARDUARt TtST 




- OAUTOI 










S450 0250SO 


010567 


000404 


2i; 




MOV 


R5,45l 


iSAVE THE CURRENT LINE GROUP. 


5451 0250!>4 


005067 


000576 






CLR 


401 


1 CLEAR THE LINE NUMBER COUNTER. 


54 5^ 0^3060 


016701 


000372 


41: 




MOV 


401. Rl 


iCOPY THE LINE NUMBER. 


54:^^ 023064 


000241 








CLC 




iCLEAR CARRY BIT PRIOR TO SHI." TING BIT MAP. 


5454 023066 


006005 








ROR 


R5 


ISHIFT ACTIVE LINE BIT MAP INTO CARRY BIT. 


5455 023070 


103064 








BCC 


81 


iSKIP TESTING THIS LINE IF IT IS INACTIVE. 


5456 






1 


I 








54 5/ 






1 


TEST THE 


STATE OF THE OAUTO BIT ON THE LINE UNDER TEST. 


545fl 






1 


REPORT ERROR IF IT IS FOUND SET, AND SKIP FURTHER TESTING OF THAT LINE. 


5439 






1 


- 








5440 025072 


012/67 


011446 


160752 




MCV 


«4902. .ERRNBR 


(SET THE ERROR NUMBER TO 4902. 


5441 023100 


01017? 


157122 






MO/ 


Rl.SCSRA 


iSELECT THE LINE TO BE TESTED. 


5442 023104 


032777 


000020 


157124 




BIT 


*eiT4.QLNCTRA 


iTEST THE STATE OF THE OAUTO BIT. 


5445 023112 


001410 








BEQ 


61 


iSKIP ERROR REPORT IF OAUTO BIT IS CLEAR. 


5444 025114 


012702 


005760 






MOV 


i^H4902.R2 


iPASS THE ERROR MESSAGE. 


5445 














1 "OAUTO BIT BAD ON LINE NN" 


5446 023120 










ERROR 




1 >>>*> ERROR 04902 <*<<<. 


023120 


104460 












TRAP C»ERROR 


544 7 
















5446 








i • 








5449 








I EXIT THE 


TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 


5450 








1 - 








5451 023122 


03276 7 


000 I 00 


157060 




BIT 


♦eiT06, OPTION 


jEXlT WITH TEST FAILURE MESSAGE IF 


5452 023150 


001556 








BEQ 


601 


iNO EXTENDED ERROR REPORTING HAS BEEN RLQUtSTED 


5455 
5454 
5455 023152 














(DURING THE SOFTUARE QUESTIONS. 


000443 








BR 


8t 


iSKIP FURTHER TESTING OF THIS LINE. 


5456 








1 


• 






5457 








1 


TRANSMIT THE XOFF (ASCII DC5) ON THE ASSOCIATED LINE. 


545a 








1 


- 






5459 023134 


1161/7 


004010 


157064 6$: 




MOVB 


TXRLNBCRD.SCSRA (SELECT Th« ASSOCIATED TX LINE. 


5460 023142 


112777 


000025 


157064 




MOVB 


#23.ar0ATA 


1 TRANSMIT THE XOFF CHARACTER TO THE LUT. 


5461 








I 


» 






5462 
5465 
5464 025150 








1 


WAIT FOR TRANSMISSION 


TO COMPLETE. 


005267 


1606 76 




I 


INC 


ERRNBR 


(INCREMENT ERROR NUMBER TO 4905. 


5465 025154 


012701 


170012 






MOV 


#170012. HI 


(TEST BIT 15. TIMEOUT OF 10 MILLI SECS . 


5466 025160 


016702 


157042 






MOV 


CSRA.R2 


(PASS THt ADDRESS OF THE REGISTER TO TEST. 


5467 025164 


0O4 767 


1/4246 






JSR 


PC.WAIBIS 


(WAIT FOR TRANSMISSION TO COMPLETE. 


5468 025170 


103154 








BCC 


501 


(ABORT TEST IF TIMEOUT OCCURRED. 


5469 025172 


012704 


000005 






MOV 


•5.R4 


(PASS TIME OUT OF 5 MILLI SECS. 


5470 023176 

5471 

54 72 


004767 


171060 






JSR 


PC. DELAY 


(WAIT FOR CHAR TO BE RECEIVED AND PROCESSED. 








1 
1 


• 
TEST THE STATE OF THE 


TX. ENABLE BIT ON THE. LINE UNDER TEST. 


5473 
54 74 
54 75 023202 








1 


REPORT ERROR IF TX. ENABLE BIT IS CLEAR. 


00526 / 


160644 




1 


INC 


ERRNBR 


1 INCREMENT ERROR NUMBER TO 4904. 


54 76 023206 


016701 


000244 






MOV 


401. Rl 


(GET THE NUMBER OF THE LINE TEST. 


5477 025212 


010177 


157010 






MOV 


Rl.SCSRA 


(SELECT THE LINE CURRENTLY LM)ER TFSr. 


5478 025216 


005777 


15/020 






TSr 


8TXA02A 


(TEST THE STATE OF THE Tx ENABLE BIT. 


54 79 025222 


10040/ 








BMI 


81 


(SKIP ERROR REPORT IF BIT IS SET. 


5480 023224 


012702 


005760 






MOV 


^EM4902.R2 


(PASS THE MESSAGE TO BE REPORTED. 


5481 














( "OAUTO BIT BAD ON t INf NN". 


5482 025250 










ERROR 




1 »>>>> ERROR 049Q4 **':<^, 


023230 


IO4460 












TRAP CaRRCR 


548 5 
















5484 








1 ♦ 









SEQ 145 



S^RBm-t'V^sf^ '^^^ '''' 



5485 

5486 

5487 

5488 

548<> 

5490 

5491 

5492 

5493 

5494 

5495 

5496 

5497 

5498 

5499 

5500 

5501 

5502 

5503 

5504 

5505 

5S06 

5507 

5508 

5509 

5510 

5511 

5512 

5513 

5514 

5515 

5516 

5517 

5518 

5519 

5520 

5521 

5522 

5523 

5524 

5525 

5526 

5527 

5528 

5529 

5530 

5551 

5532 
5533 
5534 
5535 

5536 
5537 
5538 
5539 
5540 



025252 
025240 



025242 
023246 
023250 



023252 
023256 
023262 
023266 
023272 
023500 
023304 
025306 
023310 



023312 
023320 



023326 
023352 
023356 
02334;^ 
023544 
023350 



023354 
023560 
023564 
023570 
023574 
023376 

023402 
025402 



025404 
023412 



052767 
001512 



00526 7 
005705 
001505 



016705 
0O4 767 
016705 
005067 
012767 
016701 
000241 
006005 
103041 



116177 
112777 



012701 
016702 
004767 
10304 7 
012704 
004767 



005267 
016701 
010177 
005777 
100007 
012702 



104460 



052767 
001425 



PA 



m 



TOI 



MACRO H1200 15 MAR-04 09:28 



D12 

PAGE 109-2 



5FQ 146 



000100 156750 



000210 



000202 
175544 
000172 
000164 
011451 
000152 



004010 
000021 



170012 
156670 
174074 

000005 
170706 



1604 72 
000072 
156656 
156646 

005760 



1 fcXIT THE TEST IF tXTENDED ERROR REPORTING HAS NOT BEEN tNABLtD 

(EXIT WITH TEST FAILURE HESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

lOURING THE SOFTWARE QUESTIONS. 



BIT 
BEQ 



*BIT06. OPTION 
60 » 



Qii 



INC 
TST 
BNE 



401 

R5 

4» 



I INCREMENT THE LINE NUMBER. 
(CHECK IF THERE ARE ANY MORE 



LINES TO TEST 



I DISABLE TRANSMITTERS ON THE SELECTED LINES IN THE CURRENT LINE GROUP. 
I - 



160552 10$: 



156706 
156706 



OOOlOO 156576 



MOV 45I.R5 

JSR PC.TXD5BL 

MOV 45I,R5 

CLR 401 

MOV #4905. .ERRNBR 

MOV 401, Rl 

CLC 

ROR R5 

BCC 121 



jRESlORE THE CURRENT LINE ACTIVE LINE GROUP. 
iDlSABLE TRANSMITTERS ON THE SELECTED LINES. 
(GET THE CURRENT ACTIVE LINE GROUP AGAIN. 
(CLEAR THE LINE COUNTER. 
I SET ERROR NUMBER TO 4905. 
I COPY THE LINE NUMBER. 

iCLEAR CARRY BIT PRIOR TO SHIFTING BIT MAP. 
(SHIFT ACTIVE LINE BIT MAP INTO CARRY BIT. 
(SKIP TESTING THIS LINE IF IT IS INACTIVE. 



( TRANSMIT THE XON (ASCII DCl) ON THE ASSOCIATED LINE. 

MOVB TXRLNBCRD.ttCSRA -.SELECT THE ASSOCIATED TX LINE. 

MOVB 021.QFDATA (TRANSMIT THE. XON CHARACTER TO THE LUT . 

I WAIT FOR TRANSMISSION TO COMPLETE, 

MOV #170012. Rl (TEST BIT 15, TIMEOUT OF 10 MILLI SECS. 

MOV CSRA,R2 (PASS THE ADDRESS OF THE REGISTER TO TEST. 

JSR PCWAIBIS (WAIT FOR TRANSMISSION TO COMPLETE. 

BCC 50* I ABORT TEST IF TIMEOUT OCCURRED. 

MOV #5.R4 (PASS TIME-OUT OF 5 MILLI SECS. 

JSR PC, DELAY (WAIT FOR CHAR TO BE RECEIVED AND PROCESSED. 

I'tEST THE STATE OF THE TX ENABLE BIT ON THE LINE UNDER TEST. 
( REPORT ERROR IF TX„ENABLE BIT IS SET. 

(INCREMENT ERROR NUMBER TO 4906. 
(GET THE NUMBER OF THE L INE UNDER TEST. 
(SELECT THE LINE CURRENTLY UNDER TEST. 
(TEST THE STATE OF THE TX ENABLE BIT. 
(SKIP ERROR REPORT IF BIT IS CLEAR. 
(PASS THE MESSAGE TO BE REPORTED. 
I "OAUTO BIT BAD ON LINE NN"'. 
I >^>>> ERROR 0490^ <<<<<. 

TRAP 



INC 


ERRNBR 


MOV 


001. Rl 


MOV 


Rl.SCSRA 


TST 


yTxA02A 


BPL 


12$ 


MOV 


#EM4902.R2 



ERROR 



CJERROR 



( EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

UIT #eiT06, OPTION (EXIT WITH TEST FAILURE MESSAGE IF 
BEQ 60* (NO fXTENDED ERROR REPORTINti HAS BEEN RtQUtSTtU 

(DICING THE SOFTWARE Q^fSTIONS. 



023414 005267 000036 



125: 



INC 



40J 



(INCREMENT THE LINE NUMBER, 
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3EQ X47 



5541 


023420 


005705 




5542 


023422 


001323 




5543 








5544 








5545 








5546 








5547 








5548 


023424 


005703 




5549 


023426 


001417 




5550 


023430 


005003 




5551 


023432 


012705 


177777 


5552 


023436 


004767 


173460 


5553 


023442 


016705 


156552 


5554 


023446 


046705 


156606 


5555 


023452 


000167 


177372 


5556 








5557 


023456 


000000 




5558 


02?' -.0 


000000 




5559 


02 »62 


004767 


173204 


5560 


Oc ^466 


005067 


156556 


5561 








5562 


0234 72 
023472 








023472 


104401 





TST 
BNE 



R5 
10$ 



(CHECK IF THERE ARE ANY MORE LINES TO TEST 



I 



( ♦ 



I - 



CHECK LOOP CONTROL Tt.AG TO DETERMINE IF BOTH SETS OF LINES HAVE BEEN TESTED 
If THIS IS THE FIST TIME AROUND, RE-ENABLE TX ON ALL LINES. GENERATE ACTIVE 
BIT MAP FOR SECOND LINE GROUP. 

(HAVE BOTH LINE GROUPS BEEN TESTED?. 

iYES( THEN EXIT THIS TEST, 

lNO( CLEAR THE LOOP CONTROL FLAG. 

(PASS THE BIT MAP OF ALL AVAILABLE LINE. 

(RE-ENABLE TRANSMISSION ON ALL LINES. 

(GET THE ACTIVE LINE BIT MAP. 

(REMOVE ALL ACTIVE LINES IN GROUP 1. 

(ONCE MORE AROUND AND WE ARE DONE. 

(STOPAGE FOR CURRENT LINE NUMBER. 
(STORAGE FOR CURRENT ACTIVE LINE BIT MAP. 
iREPOR'" TEST ABORTED. NON-TEST RELATED ERROR. 
(INDICATE THAT WE ARE NOT WITHIN A TEST. 





TST 


R3 




BEQ 


60$ 




CLR 


R3 




MOV 


<>MAPLNS,R5 




JSR 


PC.TXENBL 




MOV 


ACTLNS.R5 




BIC 


LGRP1M,R5 




JMP 


2$ 


40$ 


.WORD 





455 


.WORD 





50$ 


JSR 


PCJSABRT 


60$ 


CLR 


CTRLCF 



ENDTST 



L 10032; 



TRAP 



C$ETST 



F12 



S^RBJi§gt°«?k'st^ 


FUNC TST 


PART2 MACRO r 
- OAOTOI - 


5564 








5565 








5566 








5567 








5568 








5569 








5570 








5571 








5572 








5573 








5574 








5575 








5576 023474 








023474 








5577 023474 


126727 


156522 


000002 


5578 023502 


001402 






5579 023504 


000167 


000556 




5580 023510 








023510 


012700 


000240 




023514 


104441 






5581 


000006 






5582 0225:.6 


012767 


0<.10006 


156530 


5583 0235*.'4 


012767 


1T7777 


156516 


5584 023532 


012767 


000001 


160310 


5585 023540 


012767 


011611 


160304 


5586 023546 


012767 


006012 


160300 


5587 023554 


012767 


013136 


160274 


5588 








5569 








5590 








5591 








5592 








5593 023562 


004 767 


170430 




5594 023566 


103402 






5595 023570 


000167 


000472 




5596 








5597 








5598 








5599 023574 


004767 


167642 




5600 








5601 








5602 








5603 








5604 








5605 








5606 025600 


016705 


156414 




5607 023604 


012700 


000024 




5608 023610 


004 767 


173736 




5609 023614 


012705 


177777 




5610 023620 


012700 


177670 




5611 023624 


004 767 


173752 




5612 023630 


004767 


173266 




5615 








5614 








5615 








5616 025634 


012/03 


1 00000 




5617 023640 


016705 


156354 





SEQ 148 



.SBTTL HARDWARE TEST - OAUTOA - 

t* - OAUTO BIT ACTIVE TEST - 

:* 

i* THIS TEST VERIFIES THAT THE OUT'S OAUTO FUNCTION BEHAVES CORRECTLY 

t» WHEN ACTIVE» IE OAUTO BIT ASSERTED HIGH. 

t* THIS TEST WILL ONLY EXECUTE IF THE STAGGERED LOOPBACK HOOE IS SELECTED. 

I* THE SPECIAL STAGGERED LOOPBACK CONNECTOR MUST BE FITTED. 

BGNTST 

T6:: 
J CHECK MODE SELECTED. 

lOO NOT EXIT IF STAGGERD LOPBCK MODE SELECTED. 
(EXIT THIS TEST. 
iALLOW LTC INTERRUPTS. 

MOV *PRI05,R0 
TRAP CJSPRI 
i INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
(SET UP THE TEST NUMBER. (50) 
I INDICATE THAT WE ARE IN A TEST. 
I SET ERROR TYPE AS FATAL IN ERROR TABLE. 
I SET ERROR NUMBER TO 5001. 
iSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
(SELECT THE CORRECT ERROR REPORTING ROUTINE. 

I RESET THE OUT TO A KNOWN STATE, REMOVE THE STATUS CODES FROM THE FIFO. 
( CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
; THIS SUBROUTINE REPORTS ERROR >>>>> 5001 <<<<<. 
( - 



CMPB 


LOPBCK, 02 


6EQ 


.♦6 


JMP 


60$ 


SETPRI 


*PRI05 


TNUM - 


■ TNUM * 1 


MOV 


OTNUM.TSTNUM 


MOV 


#-l.CTRLCF 


MOV 


*1,ERRTYP 


MOV 


*5001. .ERRNBR 


MOV 


*EM5001,ERRMSG 


MOV 


*ER9101,ERRBLK 



JSR 
BCS 
JMP 



PC»CLNRST 

. ^6 

60$ 



(RESET THE DHU 11. REPORT AN> ERRORS FOUND 
(DO NOT EXIT IF RESET WAS SUCCESSFLH.. 
(EXIT THIS TEST. 



SET-UP THE ASSOCIATED TX/RX LINE NUMBER TABLES. 



( - 



JSR 



PC.ASLNTL 



(INITIALISE THE ASSOCIATED TX/RX TABLES. 



( SET EXTERNAL LOOPBACK .ENABLE OAUTO AND RECEIVER FUNCTIONS ON ALL ACTIVE LINES 

( SET LPR ON ALL LINES TO 38. 4K BAUD, 8 BITS PER CHARACTER, ODD PARITY, 

( 2 STOP BITS. 

I ENABLE TRANSMITTERS ON ALL LINES. 



I - 



I • 



MOV 


ACTLNS,R5 


MOV 


024. RO 


JSR 


PCWTWLNC 


MOV 


0MAPLNS.R5 


MOV 


01776/0, RO 


JSR 


PC.WTWLPR 


JSR 


PC.TXENBL 


■ OUTER 


LOOP FOR Tt 


MOV 


100000. R 3 


MOV 


ACTLNS.R5 



(PASS THE ACTIVE LINE BIT MAP. 

(PASS THE LNCTRL CONTENTS. 

(INITIALISE THE LNCTRL REGISTERS. 

(PASS BIT MAP OF ALL LINES. 

(PASS THE LPR CONTENTS. 

iINITIALSE THE LPR REGISTERS ON ALL LINES 

(ENABLE TRANSMITTERS ON ALL LINES. 



iSET-UP LOOP CONTROL FLAG. 
(GET THE ACTIVE LINE BIT MAP 



Gl::' 



CZDHVBQ OHl) 
HARDWARE 



TES 
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5618 
5619 
56^0 
5621 
5622 
5623 
5624 
5625 
5626 
5627 
5628 
5629 
5630 
5631 
5632 
5633 
5634 
5635 

5636 

5637 

5638 

5639 

5640 

5641 

5642 

5643 

5644 

5645 

5646 

5647 

5648 

5649 

5650 

5651 

5652 

5653 

5654 

5655 

5656 

5657 

5658 

5659 

5660 

5661 

5662 

5663 

5664 

5665 

5666 

5667 

5668 

5669 

56 70 

5671 

5672 



023644 
023650 
023654 
023660 
023664 
023666 
023670 



023672 
023700 
023704 

023712 
023714 

023720 
023720 



023722 
023730 



023734 
023742 



023750 
023754 
025760 
023 764 
023770 
023772 
023776 



024002 
024006 
024012 
024016 
024022 
024024 

024030 
024030 



046705 
010567 
005067 
016701 
000241 
006005 
103064 



012767 
010177 
032777 
001010 
012702 



104460 



032767 
001556 



023732 000443 



116177 
112777 



005267 
012701 
016702 
004 767 
103134 
012 7;..4 
004767 



005267 
016701 
010177 
005777 
100007 
012702 



104460 



- OAUTOA 

156412 
000404 
000576 
000372 



SEQ 149 



011612 
156322 
000020 

005760 



004010 
000023 



160076 
170012 
156242 
173446 

000005 
170260 



160044 
000244 
156210 
156220 

005760 



2$: 

4$! 



BIC 
MOV 
CLR 
MOV 
CLC 
ROR 
BCC 



LGRP2M.R5 
R5.45* 
40$ 
40$, Rl 

R5 
8$ 



i REMOVE LI^4ES IN GROUP 
(SAVE THE CURRENT LINE 
iCLEPR THE LINE NUMBER 
iCOPi THE LINE NUMBER, 
iCLEAR CARRY BIT PRIOR 
iSHIKT ACTIVE LINE BIT 
(SKIP TESTING THIS LINE 



2. 

GROUP. 
COUNTER. 

TO SHIFTING HIT MAP 

MAP INTO CARRY BIT. 

IF IT IS INACTIVE. 



160152 
156324 



i 



TcST THE STATE OF THE OAUTO BIT ON THE LINE UNDER TEST. 
REPORT ERROR IF IT IS FOUND CLEAR, AND SKIP FURTHER TESTING OF THAT LINE. 



MOV 
MOV 
BIT 
BNE 
MOV 

ERROR 



*5002. .ERRNBR 

R1,SCSRA 

#fiIT4,SLNCTRA 

6$ 

0fcM4902.R2 



I SET THE ERROR NUMBER TO 5002. 

I SELECT THE LINE TO BE TESTED. 

(TEST THE STATE OF THE OAUTO BIT. 

(SKIP ERROR REPORT IF OAUTO BIT IS SET. 

(PASS THE ERROR MESSAGE. 

I "OAUTO BIT BAD ON LINE NN" 

I > > > > > ERROR «5002 <<<<<. 

TRAP C$ERROR 



; EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



000100 156260 



BIT 
BEQ 



BR 



*eiT06, OPTION 
60$ 



8$ 



;EXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERRU.: REPORTING HAS BEEN REQUfcSTED 

iDURING THE SOFTW.'\^^E QUESTIONS. 

tSKIP FURTHER TESi TNG OF THIS LINE. 



156264 
156264 



6$: 



J TRANSMIT THE XOFF CASCII DC3) ON THF ASSOCIATED LINE. 

MOVB TXRLNBCRD.SCSRA jSELECT THE ASSOCIAIt U TX LINE. 

MOVB #23.arDATA jTRANSHIT THE XOFF CHARACTER TO THE LUT. 

! WAIT FOR TRANSMISSION TO CO^^LETE. 

(INCREMENT ERROR NUMBER TO 5003. 

iTEST BIT 15. TIMEOUT OF 10 MILLI SECS . 

jPASS THE ADDRESS OF THE REGISTER TO TEST. 

;WAIT FOR TRANSMISSION TO COMPLETE. 

(ABORT TEST IF TIMEOUT OCCURRED. 

(PASS TIME-OUT OF 5 MILLI SECS. 

(WAIT FOR CHAR TO BE RECEIVED AND PROCESSED 

I TEST THE STATE OF THE TX ENABLE BIT ON THE LINE UNDER TEST. 
I REPORT ERROR IF TX..ENABLE BIT IS SET, 

I ' 

(INCREMENT ERROR NUMBER TO 5004. 
(GET THE NUMBER OF THE LINE TEST. 
(SELECT THE LINE CURRENTLY UNDER TEST. 
(TEST THE STATE OF THE TX ENABLE BIT. 
(SKIP ERROR REPORT IF BIT IS CLEAR. 
(PASS THE MESSAGE TO BE REPORTED. 
( "OAUTO BIT BAD ON LINE NN". 
i >>>>> ERROR #5004 

TRAP 



INC 


ERRNBR 


MOV 


017OO12.R1 


MOV 


CSRA.R2 


JSR 


PC.WAIBTS 


BCC 


50$ 


MOV 


05. R4 


JSR 


PC, DELAY 



INC 


ERRNBR 


MOV 


40$. Rl 


MOV 


Rl.OCSRA 


TST 


QTXADPA 


BPL 


8$ 


MOV 


ftEM4902,R2 



ERROR 



< ^ < < < 



C$ ERROR 



1-112 
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SEQ 150 



5675 

5674 

5675 

5676 

5677 

5678 

5679 

5680 

5681 

5662 

5683 

5684 

5685 

5686 

5687 

5688 

5689 

5690 

5691 

5692 

5695 

5694 

5695 

5696 

5697 

5698 

5699 

5700 

5701 

5702 

5703 

5704 

5705 

5706 

5707 

5708 

5709 

5710 

5711 

5712 

5713 

5714 

5715 

5716 

571/ 

5718 

5719 

5720 

5721 
5722 
5723 

5724 
5725 
5726 
5727 
5728 



024032 
024040 



024042 
024046 
024050 



024052 
024056 
024062 
024066 
024072 
024100 
024104 
024106 
024110 



024112 
024120 



024126 
024132 
024136 
024142 
024144 
024150 



024154 
024160 
024164 
024170 
024174 
024176 

024202 
024202 



024204 
024212 



032767 
001512 



005267 
005705 
001303 



016705 
004767 
016705 
005067 
012767 
016701 
000241 
006005 
103041 



116177 
112777 



012701 
016702 
004767 
103047 
012704 
004767 



005267 
016701 
010177 
005777 
100407 
012702 



104460 



032767 
001425 



000202 
172744 
000172 
000164 
011615 
000152 



004010 
000021 



170012 
156070 
173274 

000005 
170106 



157672 
00CO72 
15603b 
156046 

005760 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



OOOIOO 156150 



000210 



t - 



6$: 



BIT ^IT06. OPTION 
BEQ 60* 



INC 40$ 
TST R5 
BNE 4$ 



lEXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

iDURING THE SOFTWARE QUESTIONS. 

INCREMENT THE LINC NUMBER. 

t CHECK IF THERE ARE ANY MORE LINES TO TEST. 



I DISABLE TRANSMITTERS ON THE SELECTED LINES IN THE CURRENT LINE GROUP. 



157752 10$: 



MOV 45$. R5 

JSR PC.TXOSBL 

MOV 45*. R5 

CLR 40$ 

MOV 05005.. ERRNBR 

MOV 40$. Rl 

CLC 

ROR R5 

BCC 12$ 



(RESTORE THE CURRENT LINE ACTIVE LINE GROL'P. 
iDISABLE TRANSMITTERS ON THE SELECTED LINES. 
iGET THE CURRENT LINE ACTIVE LINE GROUP AGAIN 
I CLEAR THE. LINE COUNTER. 
(SET ERROR NUMBER TO 5005. 
I COPY THE LINE NUMBER. 

(CLEAR CARRY BIT PRIOR TO SHIFTING BIT MAP. 
iSHIFT ACTIVE LINE BIT MAP INTO CARRY BIT. 
jSKIP TESTING THIS LINE IF IT IS INACTIVE. 



156106 
156106 



I TRANSMIT THE XON (ASCII DCl) ON THE ASSOCIATED LINE. 

MOVB TXRLNBCRD.aCSRA iSELECT THE ASSOCIATED TX LINE. 

MOVB 021.8FDATA (TRANSMIT THE XON CHARACTER TO THE LUT. 



t * 



MOV 


0170012, Rl 


MOV 


CSRA.R2 


JSR 


PC.WAIDIS 


BCC 


50$ 


MOV 


05, R4 


JSR 


PC, DELAY 



t WAIT FOR TRANSMISSION TO COMPLETE. 

(TEST BIT 15. TIMEOUT OF 10 MILLI SECS. 

iPASS THE ADDRESS OF THE REGISTER TC TEST. 

tWAIT FOR DMA TO COMPLETE. 

jABORT TEST IF TIMEOUT OCCURRED. 

iPASS TIME-OUT OF 5 MIlLI SECS. 

iWAIT FOR CHAR TO BE RECEIVED AND PROCESSED 

1 TEST THE STATE OF THE TX ENABLE BIT ON THE LINE UNDER TEST. 
; REPORT ERROR IF TX_ENABLE BIT IS CLEAR. 

(INCREMENT ERROR NUMBER TO 5006. 
(GET THE NUMBER OF THE LINE UNDER TEST. 
(SELECT THE LINE CURRENTLY UNDER TEST. 
(TEST THE STATE OF THE TX^ENABLE BIT. 
(SKIP ERROR REPORT IF BIT IS SET. 
(PASS THE MESSAGE TO BE REPORTED. 
i "OAUTO BIT BAD ON LINE NN". 
( >>>>> ERROR 05006 <<<<<. 

TRAP 



INC 


ERRN8R 


MOV 


40$, Rl 


MOV 


R1»SCSRA 


TST 


STXAD2A 


BMI 


12$ 


MOV 


0EM4902,R2 



ERROR 



C$ERROR 



; * 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



000100 155776 



BIT 0BIT06, OPTION 
BEQ 60$ 



(EXIT WITH TEST FAILURE MESSAGE IF 

(NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

(DURING THE SOFTWARE QUESTIONS. 
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SEQ 151 



5 729 


024214 


005267 


000036 


5750 


024220 


005705 




5751 


024222 


001323 




5 752 








5753 








5754 








5755 








5736 








5757 


024224 


005703 




5738 


024226 


001417 




5739 


024250 


005003 




5 740 


024232 


012705 


177777 


5741 


024236 


004 767 


172660 


5742 


024242 


016705 


155752 


5743 


024246 


046705 


156006 


•3744 


024252 


000167 


177372 


5745 








5746 


024256 


000000 




5747 


024260 


000000 




5748 


024262 


004767 


172404 


5749 


024266 


005067 


155756 


5750 








5751 


024272 
0242 72 








024272 


104401 





INC 40$ 
TST R5 
BNE 10$ 



(INCREMENT THE LINE NUMBER. 

i CHECK IF THERE ARE ANY MORE LINES TO TEST 



CHECK LOOP CONTROL FLAG TO DETERMINE IF BOTH SETS OF LINES HAVE BEEN TESTED 
IF THIS IS THE FIST TIME AROUND, RE-ENABLE TX ON ALL LINES. GENERATE ACTIVE 
BIT MAP FOR SECOND LINE GROUP, 

J HAVE BOTH LINE GROUPS BEEN TESTED?. 

(YESi THEN EXIT THIS TEST. 

(NO J CLEAR iHE LOOP CONTROL FLAG, 

(PASS THE BIT MAP OF ALL AVAILABLE LINE. 

I RE -ENABLE TRANSMISSION ON ALL LINES. 

(GET THE ACTIVE LINE BIT MAP. 

(REMOVE ALL ACTIVE LINES IN GROUP 1. 

(ONCE MORE AROUND AND WE ARE DONE. 

(STORAGE FOR CURRENT 1 iNr NUMBER. 
(STORAGE FOR CURRENT /.CUVE LINE BIT MAP. 
(REPORT TEST ABORTED. NON-TEST RELATED ERROR. 
(INDICATE THAT WE ARE NOT WITHIN A TEST. 





TST 


R3 




BEQ 


60$ 




CLR 


R3 




MOV 


*maplns;r5 




J5R 


PC.TXENBL 




MOV 


ACTLNS.R5 




BIC 


LGRPIM.RS 




JMP 


2$ 


40$ 


.WORD 





45$ 


.WORD 





50$ 


JSR 


PC.TSABRT 


60$ 


CLR 


CTRLCF 



ENDTST 



L10033: 



TRAP 



C$ETST 



J12 
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SEQ 152 



5753 
57S4 
5755 
5756 

5757 
5758 
5759 
5760 
5761 
5762 
5763 
5764 
5765 
5766 
5 767 
5768 
5769 
5770 
5771 

5772 



5773 
5774 
5775 
5776 
5777 
5778 
5779 
5780 
5781 
5782 
5783 
5784 
5785 
5786 
5787 
5788 
S789 
5?90 
5791 
5792 
5793 
5794 
5795 
5796 
5797 
5798 
5799 
5800 
5801 
5802 
5803 
5804 
5805 
5806 



024274 
024274 
024274 
024274 
024300 

024302 
024310 
024316 
024324 
024332 
024340 



024346 
024352 



012700 
104441 
000007 
012767 
012767 
012767 
012767 
012767 
012767 



004767 
103156 



024360 
024364 
024370 
024374 
024400 
024404 
024410 



016705 
012700 
004767 
012700 
004767 
012704 
004767 



.SBTTL HARDWARE TEST - lAUTOI - 



- lAUTO BIT INACTIVE TEST 

THIS TEST VERIFIES THAT THE OUT'S lAUTO FUNCTION BEHAVES CORRECTLY 

WHEN INACTIVE. IE. lAUTO BIT CLEAR. 

ALL ACTIVE LINES ARE TESTED INDIVIDUALLY BY FILLING THE FIFO 

THEN READING THE RECEIVED DATA CHECKING FOR THE PRESENCE OF 

XOFFC ASCII DC3) OR XON CA^.CII OCl) CHARACTERS. 

IF ANY ARE FOUND THEN APPROPRIATE ERRORS ARE REPORTED. 

ANY BMP CODES THAT ARE FOUND WILL BE PLACED ON THE OiiP CODE QUEUc. 

TO BE REPORTED LATER. 

THE CHARACTERS ARE TRANSMITTED ON ALL ACTIVE LINES, IN INTERNAL 

LOOPBACK MODE. 



000240 



000007 
177777 
000001 
011755 
006051 
013136 



I* 

I* 

i* 

!♦ 

i* 
t* 
1* 
i * 

:* 
J* 

t* 
;* 

;..4>4>4k4i4>4******4i«4>«**4>4*44i4i44>4i44>4i>K4kA4>4i4<4**>h4>4t4i4i4iA4k4iA4i4k*4i*4k**4k.h4k4k4i4iA4i4k*4i4kA4k4t4>«4k4t 
BGNTST 

I ALLOW LTC INTERRUPTS. 



T7j: 



SETPRI *PR105 



155744 
155732 
157524 
157520 
157514 
157510 



MOV OPRI05.ro 
Tuap CSSPRI 

INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

iSET UP TK€ TEST NUMBER. (51) 

(INDICATE THAT WE ARE IN A TEST. 

iSET ERROR T/PE AS FATAL IN ERROR TABLE. 

(SET ERROR NUMGER TO 5101. 

J SET ERROR MESSAGE ADDRESS IN ERROR TABLE, 

(SELECT THE CORRECT ERROR REPORTING ROUTINE. 

! RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 
t CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
i THIS SUBROUTINE REPORTS ERROR >>>>> 5101 <<<<<, 



TNUM 


•- TNUM * 1 


MOV 


OYNUM.TSTNUM 


MOV 


<>-l,CTRLCF 


MOV 


«1.ERRTYP 


MOV 


*5101. .ERRNBR 


MOV 


<^eM510l.ERRMSG 


MOV 


#ER9101,ERRBLK 



167644 



JSR 
BCC 



PC.CLNRST 
60^ 



I RESET THE DHU-11. REPORT ANY ERRORS FOUND. 
jEXIT TEST IF FATAL ERROR FOUND. 



i INITIALIZE THE 256 BYTE DATA PATTEPN. 

t ENSURE THE DATA PATTERN IS FREE FROM XON' S OR XUFF'S TO PREVENT ERRORS. 

; NOTE: THE FIRST TWO CHARACTERS ANO THE LAST TWO CHARACTERS WILL BE THE SAME 



024354 004767 170220 



JSR 



PC.INDTPX 



(INITIALISE DATA PATTERN. 



J SET INTERNAL LOdPBACK. DISABLE lAUTO, ENABLE RECEIVER ON THE SELECTED LINE 
t SET LPR TO 38. 4K BAUD, S BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 



155634 
000204 
173156 
177670 
173176 
000012 
167646 



( - 



MOV 


ACTLNS.RS 


MOV 


*204.R0 


JSR 


PC.WTWLNC 


Mnv 


«177670.RO 


JSR 


PC.Wi JLPR 


MOV 


<H0. ,R4 


JSR 


PC, DEL AY 



jPASS THE ACTIVE LINE BIT MAP. 

(PASS INT'L LOPBCK. ENABLE RX. DISABLE lAUTO 

(INITIALISE THE LINE CONTROL REGISTER. 

(PASS THE LPR CONTENTS. 

(SET THE LPR CONTENTS TO 38. 4K BAUD. 

(PASS OELA> TIME OF 10 MILL I SECONDS. 

(WAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 



K12 
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SEQ 153 



5807 
5808 
5809 
5810 
5811 
5812 
5813 
5814 
5815 
5816 
5817 
5818 
5819 
5820 
5821 
5822 
5823 
5824 
5825 
5826 
5827 
5828 
5829 
5830 
5831 
5832 

5833 
5834 
5835 
5836 
5837 
5838 
5839 
5840 
5841 
5842 
5843 
5844 
5^45 
5846 
5847 
5848 
5849 
5850 
5851 
5852 
5853 
5854 
5855 
5856 
5857 
5858 
5859 
5860 
5861 
5862 



024414 
024416 
024422 
024430 
024434 
024436 
024440 
024442 



0244*14 
024450 
024454 
024462 
024464 
024470 
024470 



024472 
024500 



024504 
024510 
024514 
024520 
024524 



i SET UP LOOP FOR ALL ACTIVE LINES. 

; TEST THE STATE OF THE lAUTO BIT PRIOR TO TRANSMITTIh4G THE DATA PATTERN. 

J IF THE BIT IS SET. THEN REPORT THE ERROR AND SKIP TRANSMITTING 

i THE DATA PATTERN ON THE SELECTED LINE. 

i TRANSMIT A 256 CHARACTER DATA PATTERN USING DMA. ON A SINGLE CHANNEL 

; EMPTY THE FIFO, AND VERIFY NO XOFF OR XON CHARS WERE FOUND. 



005001 
005067 
012767 
004767 
103121 
000241 
006005 
103107 



000264 
011756 
170734 



157422 2$: 



005267 157402 

010177 155552 

032777 000002 
001410 

012702 006106 

104460 



032767 000100 
001503 



024502 000467 



005267 157342 

012702 002650 

012703 000400 
004767 167654 
103065 



02A526 
024532 
024536 
024542 
024546 
024550 
024554 



005267 
012701 
016702 
004767 
103054 
012 704 
004 767 



157320 
170536 
155464 

172670 

000012 
167502 



CLR Rl 

CLR 55$ 

MOV «5102..ERRNBR 

JSR PC.PUFIFO 

BCC 50$ 

CLC 

ROR R5 

BCC 12t 

TEST THE lAUTO BIT ON THE 

REPORT ERROR IF IT IS SET 

00 NOT TRANSMIT THE DATA 



I - 



155554 



INC 
MOV 
BIT 
BEQ 
MOV 
ERROR 



ERRNBR 

R1,6W:SRA 

*BITl,aLNCTRA 

4$ 

«EM5102.R2 



I CLEAR THE LINE NUMBER COUNTER. 

I CLEAR STORAGE FOR LINE NLtlBER. 

I SET THE ERROR NUMBER TO 5102. 

(PURGE THE FIFO. 

iGO REPORT ERROR IF FIFO DID NOT PURGE. 

I CLEAR CARRY PRIOR TO ROTATING BIT MAP. 

i ROTATE THE BIT MAP INTO THE CARRY BIT. 

I BRANCH IF LINE IS INACTIVE. 

SELECTED ACTIVE LINE. 

PATTERN ON THE SELECTED LINE. 

(SET ERROR NUMBER TO 5103. 

(SELECT LINE TO TEST. 

(TEST THE STATE OF THE lAUTO BIT ON THIS LINE. 

(SKIP ERROR IF lAUTO BIT CLEAR. 

(PASS THE CORRECT ERROR MESSAGE, 

J >>>>> ERROR <<<<<, 

TRAP 



C$ERnOR 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



155510 



t - 



BIT 
BEQ 



BR 



*6IT06. OPTION 
60$ 



12$ 



(EXIT WITH TEST FAILURE MESSAGE IF 

(NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

(DURING THE SOFTWARE QUESTIONS. 

(SKIP TRANSMITTING DATA PATTERN. 



( * 



TRANSMIT DATA PATTERN OF 256 CHARS. 



4$: 



INC 


ERRNBR 


MOV 


<mUF3AS.R2 


MOV 


^J256. .R5 


JSR 


PC.DOOMA 


BCC 


50$ 



TX. 



(SET ERROR NUMBER TO 5104. 

(PASS THE START OF THE DATA PATTERN TO 

(PASS THE LENGTH OF THE. DATA PATTERN. 

(TRANSMIT THE DATA PATTERN. 

(ABORT THE TEST IF ERROR FOUND DURING DMA TX 



I WAIT FOR DMA TO COMPLETE. THEN WAIT FOR THE LAST CHARACTER PLUS XOFF 
( TO ARRIVE IN THE FIFO. 

(SET ERROR NUMBER TO 5105. 

(PASS TIME-OUT VALUE OF 350 MILL! SECS . 

(PASS THE ADDRESS OF THE CSR . 

(WAIT FOR DMA TO COMPLETE. TX ACTION SET. 

(IF NO TX ACTION WAS RECEIVED, ABORi THK TEST. 

(PASS DFl At OF 10 MXLH SFCS. 

(WAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



INC 


ERRNBR 


MOV 


#170536. Rl 


MOV 


CSRA.R2 


JSR 


PC.WAIBIS 


HCC 


50$ 


MOV 


^10. ,R4 


JSR 


PC. DELAY 



L12 



:> 
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SEQ 154 



5863 
5864 
5865 
5866 
5667 
5868 
5869 
5870 
5871 
567? 
5873 
5874 
5875 
5876 
5877 
5878 
5879 
5880 
5881 
5862 
5883 
5884 
5885 
5886 
5887 
5888 
588^ 
5890 
5891 
5892 
5393 

5894 
5895 
5896 
5897 
5898 
5899 
5900 
5901 
5902 
5903 
5904 
5905 
5906 
5907 
5908 
5909 
5910 
5911 
5912 
5913 
5914 
5915 



024560 
024564 
024570 
024574 



024576 
02<&02 
024604 
024606 



024612 
024616 
024620 
024624 
024626 
024630 
'V?4632 

024634 
024640 
024644 
024650 
024650 



024652 
024660 



024662 
024666 
024672 
024674 
024676 

024 /OO 
024 701 
024 706 
024710 

024 714 
024 714 
024714 



005267 
012701 
017702 
100041 



012700 
040200 
001002 
004767 



120227 
001406 
120227 
001403 
005501 
001357 
000413 

005267 
016701 
012702 

104460 



I READ 256 CHARS FROM THE FIFO, 
t ARE FOUND. 



REPORT ERROR IF ANY XOFF'5 



OR XON'S 



005267 
016701 
005705 
001252 
000404 

004 767 
000401 
000000 
005067 



104401 



157266 
000400 
155434 



170301 
171666 

000023 
000021 



6$ 



8$ 



157212 
000042 
006144 



10$: 



INC 
MOV 
MOV 
BPL 

I CHECK 

MOV 

BIC 
BNE 
JSR 

t •■ 

1 CHECK 

CMPB 
6EQ 

CMPB 
BEQ 

DEC 
BNE 
BR 



INC 
MOV 
MOV 
ERROR 



ERRNBR 
<>256. .Rl 
0RDUFA.R2 
50$ 



; INCREMENT ERROR NUMBER TO 5106. 
(INITIALISE THE READ COUNTER. 
J READ CHAR FROM THE FIFO. 
iGO REPORT ERROR IF FIFO EMPTY. 



FOR BMP CODE IN THE FIFO. SAVE ANY FOUND ON THE QUEUE 



<>170301.R0 

R2,R0 

6$ 

PC . SAVBMP 



iSET UP BMP BIT MASK. 
(TRY TO CLEAR ALL THE BMP BITS. 
:SKIP BMPSAV IF NOT A BMP CODE. 
;SAVE THE BMP CODE ON THE QUEUE. 



FOR XOFF AND XON CHARACTERS. 



R2.023 

10$ 

fi2,<>21 

10$ 

Rl 

6$ 

12$ 

ERRNBR 
55$, Rl 
«EM5103.R2 



J IS IT AN XOFF CHARACTER?. 

I YES; GO REPORT ERROR. 

jNOi IS IT AN XON CHARACTER?. 

iYESi GO REPORT ERROR. 

; DECREMENT THE READ COUNT, 

;LOOP TO READ THE NEXT CHAR. 

(GO CHECK FOR ANY UNTESTED ACTIVE LINES 

(SET ERROR NUMBER TO 5107. 
[PASS THE LINE NUMBER TO BE REPORTED. 
tPASS THE ERROR MESSAGE TO BE REPORTED. 
, >>>^i ERROR <<<<<. 

TRAP 



C$ERROR 



i • 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



03276? 000100 155330 
001413 



BIT #B1T06, OPTION 
BEQ 60$ 



(EXIT WITH TEST FAILURE MESSAGE IF 

(NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

(DURING THE SOFTWARE QUESTIONS. 



( ♦ 



CHECK IF ALL ACTIVE LINES HAVE BEEN TESTED. 



000020 
000014 



171766 



155334 



( - 



12$: 


INC 


55$ 




MOV 


55$. Rl 




TST 


R5 




BNE 


2 J 




BR 


£0$ 


50$: 


JSR 


PC. TSABRT 




BR 


60$ 


55$: 


.WORD 





60$: 


CLR 


CTRLCF 



(INCREMENT LINE NUMBER. 

(GET NUMBER OF THE NEXT LINE TO TEST. 

(ARE THERE ANY MORE ACTIVE LINES TO TE! 

(LOOP TO CHECK NEXT LINE. 

(EXIT TEST. 



iT?. 



(REPORT TEST ABORTED. NON-TEST RELATED ERROR 

(EXIT THIS TEST . 

t STORAGE FOR LINE NUMBER. 

(INDICATE THAT WE ARE NOT WITHIN A TEST. 



ENOTST 



L10034: 



RAP 



C$tTST 



M12 
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SEQ 155 



5917 
5918 
5919 
5920 
5921 
5922 
5925 
5924 
5925 
5926 
592 7 
5928 
5929 
5930 
5951 
5932 
5933 

5934 



59:55 
59-i6 
59;S7 
-9 '8 
b9,.9 
59^40 
5941 
5942 
5943 
5944 
5945 
5946 
5947 
5948 
5949 
5950 
5951 
5952 
5955 
5954 
5955 
5956 
5957 
5958 
5959 
5960 
5961 
5962 
5963 
5964 
5965 
5966 
5967 
5968 
5969 
5970 



024716 
024716 
024716 
024716 
024722 

024724 
024732 
024740 
024746 
024754 
024762 



G24770 
024774 
024776 



025006 
025012 
025016 
025022 
025026 
025032 
025036 



012700 
104441 
000010 
012767 
012 767 
012767 
012767 
012767 
012767 



000240 



000010 
177777 
000001 
012121 
006174 
013136 



004 767 167222 

103402 

000167 000400 



025002 004767 167572 



016705 
012700 
004767 
012700 
004767 
012/04 
004767 



155206 
000206 
172530 
177670 
172550 
000012 
167220 



.SBTTL HARDWARE TEST - lAUTOA - 



- lAUTO BIT ACTIVE TEST 

THIS TEST VEP..-IES THAT THE DUT'S lAUTO FUNCTION BEHAVfcS CORRECTLY 

WHEN ACTIVE. ' c". lAUTO ASSERTED HIGH. 

ALL ACTIVE LINES ARE TESTED INDIVIDUALLY BY FILLING THE FIFO, AND 

CHECKIf^ FOR THE PRESENCE OF AT LEAST ONE XOFF( ASCII DC3) CHARACTER 

AND ONE XON C ASCII DCl) CHARACTER. 

ANY BMP COOES THAT ARE FOUND WILL BE PLACED ON THE BMP CODE QUEUE, 

TO BE REPORTED LATER. 

THE CHARACTERS ARE TRANSMITTED ON ALL ACTIVE LINES. IN INTERNAL 

LOOPBACK MODE. 



;* 
t* 
;* 
I* 
:* 
I* 
;♦ 

!* 
i* 
J* 
1* 

;♦ 

BGNTST 

lALLOW LTC INTERRUPTS. 



T8:: 



155322 
155310 
157102 
157076 
157072 
157066 



SETPRl «PRI05 



TNUM «■ TNUM f 1 

MOV #TNUM.TSTNUM 

MOV *-l.CTRLCF 

MOV *1,ERRTYP 

MOV *5201. .ERRNBR 

MOV *EM5201.ERRM5G 

MOV OER9103 .ERRBLK 



MOV «PRI05,R0 
TRAP C$SPRI 

lINCREMENT THE ASSEMBLY TIME TEST COLWTER. 

iSET UP THE TEST NUMBER. (52) 

i INDICATE THAT WE ARE IN A TEST. 

(SET ERROR TYPE AS FATAL IN ERROR TABLE. 

iSET ERROR NUMBER TO 5201. 

(SET ERROP MESSAGE ADDRESS IN ERROR TABLE. 

I SELECT THE CORRECT ERROR REPORTING ROUTINE. 



; RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS CODES FROM THE FIFO. 
; CI -.t^R TX AND »X INTERRUPT ENABLE BITS IN THE CSR. 
i THIS SUBROUTINE REPORTS ERROR >■•>>> 5201 <<<^<. 

jRESET THE DHU-11. REPORT ANY ERRORS FOUND. 

jEXIT TEST IF FATAL ERROR FOUND. 

! INITIALIZE THE 256 BYTE DATA PATTERN. 

ENSURE THc DATA PATTERN IS FREE FROM XON' S OR XOFF'S TO PREVENT ERROR^i. 
KOTE: THE FIRST TWO CHARACTERS AND THE LAST TWO CHARACTERS WILL BE THE SAME, 



JSR 


PCCLNRST 


BCS 


.♦6 


JMP 


60$ 



JSR 



PC.INDTPX 



.INITIALISE DATA PATTERN. 



SET INTERNAL LOOPBACK, ENABLE lAUVO ANO RECEIVER ON THE SELECTED LINE. 
SET LPR TO 38. 4K BAUU, S BITS PE'^ CHARACTER. ODD PARITY, 2 STOP BITS. 

jPASS THE ACTIVE LINE BIT MAP. 

(PASS INTERNAL LOPOCK, ENABLE RX AND lAUTO. 

tINITIALISE THE LINE CONTROL REGISTER. 

(PASS THE LPR CONTENTS. 

(SET THE LPR CONTENTS TO 38. 4K HAUO. 

(PASS DELAY TIME OF 10 MILLI SECONDS. 

I WAIT FOR LNuTRL AND LPR REGS TO BE UPDATED. 

i'sET UP LOOP FOR ALL ACTIVE LINES. 



MOV 


ACTLNS,R5 


MOV 


«206,R0 


oSR 


PC.WTWLNC 


MOV 


0177670, RO 


JSR 


PC.WTWLPR 


hOV 


aio. .R4 


JSR 


PC. DEL AY 



N12 



CZDHVBO OHU 11 FUNC TST PART2 MACRO M1200 15-MAR-84 09:28 PAGE 112-1 
HARDWARE TEST - lAUTOA - 



SEQ 156 



5971 




1 


5972 






5975 






5974 






5975 






5976 






5977 025042 


005001 




5978 025044 


005067 


000330 


5979 025050 


012767 


012122 156774 2 


59S0 025056 


004767 


170306 


5981 025062 


103143 




5982 025064 


000241 




5983 025066 


006005 




5984 025070 


103131 




598S 






5966 






5987 






5988 






5989 






5990 025072 


005267 


156754 


5991 025076 


010177 


155124 


5992 025102 


032777 


000002 155126 


5993 025110 


001010 




5994 025112 


012702 


006227 


5995 






5996 025116 






025116 


104460 




599 7 






5998 






5999 






6000 






6001 025120 


032767 


000100 155062 


6002 025126 


001525 




6003 






6004 






6005 025130 


000511 




6006 






6007 






6008 






6009 






6010 025132 


005267 


15671'i * 


6011 025136 


012702 


002650 


6012 025142 


012703 


000337 


6013 025146 


004767 


167226 


6014 025152 


103107 




6015 






6016 






6017 






6018 






6019 






6020 025 54 


005267 


156672 


60,^1, 025160 


012701 


170454 


6022 025164 


016702 


155036 


6023 025170 


004 767 


172242 


d024 025174 


103076 




6025 025176 


01270a 


000012 


6026 025202 


004 767 


16705< 



TEST THE STATE OF THE OAUTO BIT PRIOR TO TRANSMITTING THE DATA PATTERN 
IF THE BIT IS CLEAR. THEN REPORT THE ERROR AND SKIP TRANSMITTING 
THE DATA PATTERN ON THE SELECTED LINE. 
TRANSMIT A 224 CHARACTER DATA PATTERN USING DMA. ON A SINGLE CHANNEL 
EMPTY THE FIFO. AND COUNT THE XOFF AND AN XON CHARS FOUND. 



2$: 



CLR 


Rl 


CLR 


55i 


MOV 


*5202. .ERRNBR 


JSR 


PC.PUFIFO 


BCC 


50$ 


CLC 




ROR 


R5 


BCC 


16$ 



(CLEAR THL LINE NUMBER 

; CLEAR STORAGE FOR LINE NUMBER. 

J SET THE ERROR NUMBER TO 5202. 

J PURGE THE FIFO. 

iGO REPORT ERROR IF FIFO DID NOT PURGE. 

jCLEAR CARRY PRIOR TO ROTATING BIT MAP. 

iROTATE THE 8:^1 MAP INTO THE CARRY BIT. 

.'BRANCH IF LINE IS INACTIVE. 

TEST THE lAUTO BIT ON THE SELECTED ACTIVE LINE. 
REPORT ERROR IF IT IS CLEAR. 
DO NOT TRANSMIT THE DATA PATTERN ON THE SELECTED LINE. 

I SET ERROR NUMBER TO 5203. 

I SELECT LINE TO TEST. 

I TEST THE STATE OF THE lAUTO BIT ON THIS LINE. 

I SKIP ERROR IF lAUTO BIT SET. 

J PASS THE CORRECT ERROR MESSAGE. 

J "lAUTO BIT FOUND CLEAR ON LINE ^N" 

; >>>>> ERROR <<<<* . 

TRAP 



INC 


ERRNBR 


MOV 


Fl.SCSRA 


BIT 


OBITl.SLNCTRA 


BNE 


4$ 


MOV 


*EMb202,R2 



ERROR 



C$ ERROR 



t • 



I EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT 
BEQ 



BR 



^IT06. OPTION 
60$ 



16$ 



jEXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN RL.UESTED 

jOUftING THE SOFTWARE QUESTIONS. 

iSKIP TRANSMITTING DATA PATTERN. 



TRANSMIT DATA PATTERN TO FILL THE FIFO. 223 CHARS * 32 XOFF'S * XON. 



4$: 



INC ERRNBR 

MOV *BUFBAS,R2 

MOV *223. .R3 

JSR PC.DODMA 

BCC 50$ 



tSET ERROR NUMBER TO 5204. 

;PASS THE START OF THE DATA PATTERN TO TX. 

(PASS THE LENGTH OF THE DATA PATTERN. 

[TRANSMIT THE DATA PATTERN. 

i ABORT THE TEST IF ERROR FOUND DURING DMA TX 



WAIT rOR DMA TO COMPLETE, THEN WA.T FOR THE LAST CHARACTER PLUS XOFF 
TO ARRIVE IN THE FIFO. 

J SET ERROR NUMBER TO 5205. 

)PASS TIME-OUT VALUE OF 300 MILLI 5ECS . 

(PASS THE ADDRESS OF THE CSR. 

iWAIT FOR DMA TO COMPLETE. TX ACTION SET. 

ilF NO TX ACTTON WAS RECEIVED. ABORT THh Tt 

iPASS OELAlf OF 10 MILLI SECS . 

iWAIl FOR LAST CHAR TO ARRIVE IN THE FI(-0. 



INC 


ERRNBR 


MOV 


dl70454.Rl 


MOV 


CSRA.R2 


j:'.r 


PC.WAIBIS 


BCC 


50$ 


MGV 


fllO. .R4 


JSR 


PC.DELAV 



Bl 



C7DHVB0 DHl' 11 
HARDWAPt TtST 

60^7 

6038 

603<> 

6050 

6051 025206 

6057 025210 

605-( 02521? 

6054 025216 

6055 025222 

6056 025226 
6057 

6058 
605^ 

6040 025250 

6041 025254 

6042 025256 
6045 025240 
6044 

6045 
6046 

604 7 025244 

6048 025250 

6049 025252 

6050 025254 

6051 025260 

6052 025262 
6055 025264 
6054 025266 
6055 

6056 
6057 
6058 
6059 
6060 
6061 
6062 
6065 
6064 
u065 
6066 
6067 
6068 
6069 
6070 
6071 
6072 
6075 
60 74 
6075 
60 76 
60/7 
6078 
60/9 

6080 
6081 



FUNC TST 



0252 70 
025274 
025276 

025500 
025504 
025510 
0255U 



025514 
025516 
025520 
025524 
025526 
025552 
025556 

025542 
025542 



005005 
005004 
005267 
012701 
017702 
100061 



012700 
040200 
001002 
004767 



120227 
001001 
005205 
120227 
OOlOOl 
005204 
005501 
001412 



02012/ 
001552 
010400 

012704 
004 76/ 
010OO4 
000745 



005 705 
001405 
02042/ 
001415 
005267 
016701 
012/02 



104460 



PART? MACRO 
lAUTOA 



M1200 l5-MAR-e4 09j2fl PAGE 112-2 



SEQ 157 



CI 
HA 



156654 
000400 
155002 



170501 
171254 

000025 
000021 



6$: 



81: 

lot: 
121: 



000176 



00000 I 
166752 



000001 

156520 
000042 
006 U4 



15»: 



UM 



t • 
I 
I ■ 



READ 256 CHARS FROM THE FIFO. COUNT ANY XOf T OR XON QHARS FOUND, 



iCLEAR XOFF COUNTER. 

iCLEAR XON COUNTER. 

I INCREMENT ERROR NUMBER TO 5206. 

lINITIALISE THE READ COUNTER. 

iREAD CHAR FROM THE FIFO, 

lOO REPORT ERROR IF FIFO EMPTY. 

FOR BMP CODE IN THE FIFO, SAVE ANY FOUND ON THfc QUEUE 



«170501,RO 
K2,R0 

PC.SAVBMP 



FOR XOFF AND XON CHARACTERS. 



CLR R5 

CLR R4 

INC ERRNBR 

MOV «256.,R1 

MOV 8RBUFA.R2 

BPL 501 

I CHECK 

MOV 

BIG 
BNE 
JSR 

i CHECK 

CMPB R2.025 

BNE 10« 

INC R5 

CMPB R2,02l 

BNE 121 

INC R4 

DEC Rl 

BEQ 151 

I CHECK IF THE FIFO HAS 
I HAS DELAY FOR IMS TO 

CMP Rl,«126. 

BNE 6» 

MOV R4 , flO 



jSET UP BMP BIT MASK. 
I TRY TO CLEAR ALL THE 
iSKIP BMPSAV IF NOT A 
I SAVE THE BMP CODE ON 



BMP BITS. 
BMP CODE. 
THE QUEUE. 



(IS IT AN XOFF CHARACTER? . 

iNG, BRANCH TO SEE IF IT IS AN XON. 

(COUNT The XOFF CHAR, 

(IS IT AN XON CHARACTER?. 

(NO. SKIP THE NEXT INSTRUCTION. 

(COUNT THE XON. 

(DECREMENT THE READ COUNT. 

(BRANCH IF ALL CHARACTERS READ. 



BEEN EMPTIED BELOW 
ALLOW THE XON TO BE 



THE HALF LEVEL. IF IT 
GENERATED. 



MOV 
JSR 

MOV 
BR 

( VERIFY 
I REPORT 



I 



TST 
BEQ 
CMP 

BEQ 

INC 
MOV 
MOV 

ERROR 



• 1.R4 

PC. DELAY 

R0,R4 

6t 

THAN AT LEAST 
ERROR IF NONE 

R5 
141 

R4.01 
161 

ERRNTIR 
55«.Rl 
eEH5105.R2 



(IS THE FIFO LEVEL • 126 ? 

(LOOP TO READ THE NEXT CHARACTER U 

(SAVE THE XON COUNT. ALTHOUGH THERE 

(BE ANT . 

(SET TMf OELAt TO IMS, 

(PERFORM TmE DELAY . 

iRESTORE THE XON fOUNT . 

(LOOP TO READ THE NEXT CHAR. 



NOT . 
SHOLIDN- T 



1 XOFF AND 1 
WERE FOUND. 



XON WAS FOUND IN THE MFU. 



(CHECK XOFF COUNT . 

(GO REPORT ERROR IF NONE FOUND. 

(CHECK XON COUNT • 1. 

(SKIP TK ERROR REPORT IF ONE XOf'* WAS FQLfJD. 

(SET ERROR NUMBER TO 520 7. 

(PASS THE LINE NUMBER TO BE REPORTED. 

(PASS THE ERROR MESSAGE TO BE REPORTED. 

( "lAUTO BIT BAD ON L INE NN ' . 

I > > > » » ERROR < < < < « . 

TRAP CVEHUOR 



1 LXXT THE TEST IK tXltNDtD ERROR REPURTINU HASi NOT QEtN ENAULtO 



CI 



C/DHVBO DHLi II 
HARDWARt Tt.ST 



6065 
^084 
&085 
6086 
606/ 
6088 
6089 
6090 
6091 
6092 
6095 
6094 
6095 
6096 
6097 
6098 
6099 
6100 
6101 



0^5544 
025552 



025354 
025 S60 
025564 
025566 
025570 

025572 
0255 76 
025400 
02540;? 

0."'5406 

025406 
025406 



KUNC TST PART.^ MACRO Ml 200 
lAUTOA 



15-MAR 84 09!2H PAUE 1X2-5 



SEQ 158 



052 767 
001415 



005267 
016701 
005 705 
OO1250 
000404 

004 76 7 
000401 
000000 
005067 



104401 



000100 154656 



000020 
000014 



171274 



154642 



BIT <«irQ6, OPTION 

BEQ 601 



lEXIT WITH T*:ST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

iDURING THE SOFTWARE QUESTlONb. 



I'cHtCK IF ALL ACTIVE LINES HAVE BEEN TESTED. 
I - 



16J: 


INC 


551 




MOV 


551, Rl 




rsT 


R5 




BNE 


2« 




BR 


601 


50«: 


JSR 


PC.TSABRT 




BR 


601 


551: 


.WORD 





60*! 


CIR 


CTRLCF 



I INCREMENT LINE NUMBER. 

iGET NUMBER OF THE NEXT LINE TO TE'iT. 

,ARE THERE ANY MORE ACTIVE LINES TO TEST?. 

iLOOP TO CHECK NEXT LINE. 

(EXIT TEST. 

(REPORT TEST ABORTED. NON-TEST RELATED ERROR. 

(EXIT THIS TEST. 

I STORAGE F*OR LINE NUMBER. 

I INDICATE THAT WE ARE NOT WITHIN A TEST. 



ENDTbl 



L1005 



c. . 



TRAP 



C5ETST 



S^RBiiBSf'^'i'^sl 



1 TUNC TST PA 



P{?OAT 



MACRO HlJ^OO 15 -MAR 84 09j28 



PAGE 115 



SfcQ 159 



M05 










M04 










61 OS 










t)106 










610'.* 










C108 










MO^ 










6110 










6111 










61U"^ 










611.^ 










6114 










6U^ 










6116 










611,' 










6118 










6119 


0^5410 
0^5410 








61^0 


025410 










025410 


012700 


000240 






025414 


104441 






6i;?i 




OOOOU 






61?c? 


025416 


012767 


000011 


154630 


61^5 


025424 


012 767 


177777 


154616 


61?4 


025452 


012767 


000001 


156410 


6125 


025440 


012 767 


012265 


156404 


61^6 


025446 


012767 


006265 


156400 


6ip; 










6128 










61J9 










6150 










6131 










615^> 


025454 


004 76 7 


166536 




6155 


025460 


103113 






6154 










6155 










6156 










6157 










6158 


025462 


004 767 


167002 




6159 


0254 1>6 


105110 






6140 


025470 


004 767 


167054 




6141 










614a 










6145 










6144 










614S 










6146 










6147 










6148 










6149 


0254 74 


012700 


000204 




6150 


025500 


004 767 


172046 




6151 


025504 


012 700 


177670 




6152 


025510 


004 767 


17206t 




6155 


025514 


012704 


000012 




6l'>4 


025520 


004 767 


1665 5b 




6155 


025524 


012/02 


002650 




6156 


025530 


012705 


000400 





SBTTL HARDWARE TEST FIFOAT - 

FIFO VALID DATA TEST - 

THIS TEST VERIFIES THAT THE OUT IS CAPABLE OF HOLDING 256 VALID 

CHARACTERS IN ITS FIFO. 

THE CHARACTERS ARE TRANSMITTED ON THE FIRST AVAILABLE ACTIVE LINE. IN 

INTERNAL LOOPBACK MODE. 

THE DATA FOUNO IS THE FIFO IS COMPARED WITH THE EXPECTED DATA, AND ANY 

DISCREPANCIES ARE REPORTED. 

ANY BMP CODE FOUNO WILL INVALIDATE THE TEST AND CAUSE IT TO BE ABORTED. 

HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODE QUEUE. TO BE 

REPORTED LATER. 

BGNTST 

lALLOW LTC INTERRUPTS. 



T9ii 



SETPRl <>PRI05 



TIJUM •- TNUM . I 
MOV OTNUM.TSTNUM 

MOV •-I.CTRLCF 

MOV Ol.ERRTYP 

MOV •5301. .ERRNOR 

MOV 0€M530l.ERRMSG 



MOV ^PRIOS.RO 

TRAP C tSPRI 

(INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

iSET UP THE TEST NLr«ER . C53) 

I INDICATE THAT WE ARE IN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE, 

I SET ERROR NUMBER TO 5501, 

iSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 



I RESET THE DUT TO A KNOWN STATE. REMOVE THE STATUS CODES FROM THE FIFO. 
» CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
I THIS SUBROUTINE REPORTS ERROR >>>>> 5301 <<<<<. 
I • 



JSR 

BCC 



PC.CLNRST 
601 



iRESET THE OHU-ll. REPORT ANi ERRORS FOUND. 
lEXIT TEST IF FATAL ERROR FOUND. 



I FIND AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 
I INITIALISE 2u6 BYTE DATA PATTERN. 

JSR PC.FINACT (FIND AN ACTIVE LINE. 

BCC 601 »EXIT IF NO ACTIVE LINES FOUNO. 

JSR PC.INOATP iINITIALISE THE DATA PATTERN. 

I TRANSMIT A 265 CHARACTER DATA PATTERN USING DMA. ON A SINGLE CHANNEL 
I AT 38. 4K BAUD, 8 BITS PER CHARACTER. ODD PARITY, 2 STOP BITS. 
1 • 

» SET INTERNAL LOOPBACK ON THE SELECTED LINE. 

I TRANSMIT THE DATA PATTERN ON THE FIRST AVAILABLE ACTIVE LINE. 

MOV •204.R0 (PASS PARAMETER FOR INTERNAL LOPBCK ,t NABLE RX, 

JSR PC.WTWLNC iINITILAISE THE LINE CONTROL REGISTER. 

MOV ♦177670. RO (PASS THE LPR CONTENTS. 

JSR PC.WTWLPR iSET THE LPR CONTENTS TO 58. 4K BAUO. 

MOV «10..R4 iPASS DELAY TIME OF 10 MILLI SECONDS. 

JSR PC. DELAY jWAIT FOR LNCTRl AND I.PR RfcGS TO BE L-PDAIU). 

MOV ^UtBAS,R2 iPASS THE START OF THE DATA PATTERN UT TX. 

MOV 0BUFMID-BUFBAL.R3 jPASS THE LENGTH OF THE DATA PATTERN. 



b 1 3 
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SEQ 160 



t>l57 

6158 

^S159 

b\60 

6161 

6162 

6163 

6164 

6165 

6166 

6167 

6168 

6169 

6170 

6171 

6l7c> 

6175 

6174 

6175 

6176 

6177 

6178 

6179 

6160 

6161 

618^ 

6183 

6184 

6185 

6166 

6187 

6188 

6189 

6190 

6191 
6192 
6193 
6194 
6195 
6196 
6197 
6198 
6199 
6200 

6201 
6P02 
6203 
6204 
6205 
6206 
6207 

6208 
6209 
6210 
6211 



025534 
025540 
025544 



025546 
025552 
025554 
025560 
025564 
025570 
025572 
025576 



025602 
025604 
025606 
025612 
025620 
025622 



025624 
025630 
025654 
025636 
025656 

025640 

025642 
025646 
025650 
025652 
025660 

025664 
025664 



025666 
025674 



025676 
025700 
025/02 



005267 
004 767 
103057 



005267 
0.10103 
012701 
016702 
004 767 
105045 
012704 
004767 



006303 
005004 
016705 
012767 
011502 
100030 



005267 
004 767 
103002 

104460 

000423 

005267 
120402 
001412 
012767 
012701 

104460 



032767 
001405 



105204 
001544 
000402 



156312 
166634 



INC ERRNBR 
JSR PC.DODMA 
BCC 50$ 



I SET ERROR KMiBER TO 5302. 

; TRANSMIT THE DATA PATTERN. 

lABORT TEST IF ERROR FOUND DURING DMA TX 



I • 



I UAIT FOR DMA TO COMPLETE, THEN WAIT FOR THE LAST CHARACTER TO ARRIVE IN 
I THE FIFO, 



156300 

170536 
154442 
171646 

000005 
166460 



i • 



INC 


ERRNBR 


MOV 


R1.R3 


MOV 


*170536.R1 


MOV 


CSRA.R2 


JSR 


PC.WAIBIS 


BCC 


50$ 


MOV 


<^5.R4 


JSR 


PC, DEL AY 



I SET ERROR NUMBER TO 5503. 

(SAVE THE NUIiBER OF THE SELECTED ACTIVE LINE 

iPASS TIME-OUT VALUE OF 550 MILLI SECS. 

I PASS THE ADDRESS OF THE CSR. 

iWAIT FOR DMA TO COMPLETE. TX^ACTION SET. 

iBRANCH IF FIFO EMPTY. ABORT THE TEST. 

iPASS DELAY OF 5 MILLI SECS. 

jWAlT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



1 * 



READ THE FIFO CHECKING FOR DATA CORRUPTION, REPORT ANY ERRORS FOUND. 
; ABORT THE TEST IF A BMP CODE WAS FOUND IN THE FIFO. 



154416 
012270 



156232 2$ 



iMULTIPLY BY 2. 

(INITIALISE THE EXPECTED DATA. 

(GET THE ADDRESS OF THE RECEIVER BUFFER REG 

iSET UP ERROR NUMBER EACH TIME AROLWO LOOP. 

jGET THE ACTUAL DATA FROM THE FIFO. 

(ABORT THE TEST IF THE FIFO IS EMPTY. 

I CHECK IF THE READ CHARACTER IS A BMP CODE. 

I IF IT IS A BMP CODE SAVE IT ON THE QUEUE TO BE REPORTED LATER, AND 

; ABORT THE TEST. 



ASL 


R5 


CLR 


R4 


MOV 


RBUFA,R5 


MOV 


*5504. .ERRNBR 


MOV 


(R5),R2 


BPL 


50$ 



156222 
166142 



INC 
JSR 
BCC 
ERROR 



BR 



ERRNBR 

PC.CHKBMP 
4$ 



60$ 



I SET ERROR NUMBER TO 5305. 
I CHECK IF CHARACTER IS A BMP CODE. 
I BRANCH IF NOT A BMP CODE. 
i >>»>> ERROR 5305 <<<<< 

TRAP 

i ABORT THIS TEST. 



C$ERROR 



156204 



012644 
006321 



4$: 



156176 



6): 



INC 


ERRNBR 


CMPB 


R4,R2 


BFQ 


8$ 


MOV 


^R9002.ERRBl K 


MOV 


OEM5302.R1 


iREPORT 


THE ERROR "»■ IFO 


ERROR 





000100 154314 



8$ 



I SET ERROR NLMBER TO 5506. 

(COMPARE THE EXPECTED WITH THE ACTUAL. DATA. 

(SKIP ERROR REPORT IF DATA IS OK. 

(SELECT THE CORRECT ERROR REPORTING ►lOUTINE. 

(PASS THE MESSAGE TO BE REPORTED. 

BAD. DATA FIELD CORRUPTED" 

( >>>>> ERROR 5306 <<<<<. 

TRAP CJERROR 

I EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

BIT ^IT06. OPTION lEXlT WITH TEST FAILURE MESSAGE X^ 
RFQ 60$ (NO EXTENDED ERROR REPORTING HAS BEEN RfcUUtSTEO 

(DltfllNG THE SOFTWARE QL»ESTIONS, 

(INCREMENT THE EXPECTED DATA. 

(LOOP IF NOT DONE* 

(EXIT 



INCB 


R4 


BNE 


2$ 


BR 


605 



F13 
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HARDWARF TEST - FirOAT 



StQ 16X 



h^\^ 












6215 025704 


004767 


170762 


50*: 


JSR 


PC.TSABRT 


6214 025710 


005067 


154334 


60$: 


CL.H 


CTRLCF 


6215 












6216 025714 








ENorsT 




025 ri4 












0257 L4 


104401 











(ABORT THE TFST. REASON SHOWN BY ERROR NUMBER. 
(INDICATE THAT Wt ARE NOT WITHIN A TEST. 



L 10036: 



TRAP 



CJETST 



G13 
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StQ 162 



6218 
6219 
6220 
6221 
6222 
6223 
6224 
6225 
6226 
6227 
6228 
6229 
6230 
6231 
6232 
6233 
6234 

6235 



6236 
6237 
6258 
6239 
6240 
6241 
6242 
6243 
6244 
6245 
6246 
624 7 
6248 
6249 
6250 
6251 
6252 
6253 
6254 
6255 
6256 
6257 
6258 
6259 
6260 
6261 
*3262 
6265 
6264 
6265 
6266 
6267 
6268 
6269 
62 70 
6271 



025716 
025716 
025716 
025716 
025722 

025724 
025732 
025740 
025746 
025754 
025762 



025770 
025774 



025 7 76 
026002 



012700 
104441 
000012 
012767 
012767 
012767 
012767 
012767 
012767 



004 767 
103111 



004 767 
105106 



000240 



000012 
177777 
000001 
012431 
006452 
011762 



154322 
154310 
156102 
156076 
156072 
156066 



166222 



166466 



026004 004767 166570 



026010 
026014 



012/00 
004 767 



000206 
171532 



.SBTTL HARDWARE TEST - flSQUl - 



i * 
i* 

t* 
I* 
i* 
1* 

I* 

;* 
i* 
:♦ 

:* 



- FIFO 3/4 LEVEL INACTIVE TEST 

THIS TEST VERIFIES THAT THE DUT'S FIFO 3/4 LEVEL ALARM SYSTEM 

REMAINS INACTIVE WHILE IT CONTAINS 191 CHARACTERS OR LESS. 

THE TEST LOOKS FOR AN XOFF (ASCII DC3) CHARACTER IN THE FIFC, 

IF ANY XOFF'S ARE FOUND AN ERROR WILL BE REPORTED AND THE TEST ABORTED. 

ANY BMP CODE FOUND WILL INVALIDATE THE TEST AND CAUSE IT TO BE ABORTED. 

HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODE QUEUE. TO BE 

REPORTED LATER. 

THE CHARACTERS ARE TRANSMITTED ON THE FIRST AVAILABLE ACTIVE LINE, IN 

INTERNAL LOOPBACK MODE. 



BGNTST 

I ALLOW LTC INTERRUPTS. 



TIO:: 



SETPRl tfPRIOli 



TNUM -■ TNUM ♦ 1 

MOV OTNUM.TSTNUM 

MOV 0-l,CTRLCF 

MOV «1,ERRTYP 

MOV '^5401..ERRNBR 

MOV *EM5401,ERRMSG 

MOV #ER0503.ERflBLK 



MO ' *PRI05.R0 
TRAP OSPRI 

J INCREMENT THE ASSEMBLY TIME TEST CO'JNTER. 

iSET UP THE TEST NUMBER. (54) 

(INDICATE THAT WE ARE IN A TEST. 

(SET FATAL ERROR TYPE IN ERROR TABLE. 

I SET ERROR NUMBER TO 5401. 

iSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

iSELECT THE CORRECT ERROR REPORTING ROUTINE. 



J RESET THE OUT TO A KNOWN «iTATE, REMOVE THE STATUS CODES FROM THE FIFO. 
I CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
t THIS SUBROUTINE REPORTS ERROR >>>>> 5401 <<<<<. 

JSR PC.CLNRST jRESET THE DHU-11. REPORT ANY ERRORS FOUNO. 
BCC 60$ jEXIT TEST iF FATAL ERROH FOiJNO. 

; FIND AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 



JSR 
BCC 



PC.FINACT 
60$ 



jFINO THE NUMBER OF THE FIRST ACTIVE LINE. 
;EXIT IF NO LINES ARE AVAILABLE. 



: INITIALIZE THE 256 BYTE DATA PATTERN. 

; ENSURE THE DATA PATTERN IS FREE FROM XON' S OR XOFF'S TO PREVENT ERRORS. 

( NOTE: THE FIRST TWO CHARACTERS AND THE LAST TWO CHARACTERS WILL BE THE SAME. 

; - 



JSR 



PC.INOTPX 



I INITIALISE THE DATA PATTERN. 



I TRANSMIT A 191 CHARACTER DATA PATTEPW USING DMA. ON A SINiiLt CHANNEL 
; AT 38. 4K BAUD. 8 BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 
I - 

I SET INTERNAL LOOPBACK. ENABLE lAUTO AND RX ON THE SELECTED LINE. 
1 TRANSMIT THE DATA PATTERN ON THE FIRST AVAILABLE. ACTIVE LINfc. 



MOV 
JSR 



#206. RO 

PC.WTWLNC 



iPASS INTI-RNAL LOPBCK , e.NABt H Rx ANP lAUTJ. 
jINlTILAISE THE LINE CONTROL REGISTER. 
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5EQ 163 



6272 026020 


012700 


177670 


6273 026024 


004767 


171552 


6274 026050 


012704 


000012 


6275 026034 


004767 


166222 


6276 026040 


012702 


002650 


6277 026044 


012703 


00027 7 


6278 026050 


004767 


i.66324 


62 79 026054 


103057 




6280 






6281 






6282 






6283 






6284 






6285 026056 


005267 


155770 


6286 026062 


012701 


170454 


6287 026066 


016702 


154134 


6288 026072 


004767 


171340 


6289 026076 


103046 




6290 026100 


012704 


000005 


6291 026104 


004767 


166152 


6292 






6293 






6294 






6295 






6296 






6297 






6298 






6299 






6300 026110 


005004 




6501 026112 


016705 


154112 


6302 026116 


012767 


012433 


6303 026124 


011502 




G304 026126 


100032 




6305 026130 


005204 




6506 






6307 






6308 






6309 






6310 






6311 026132 


005267 


155714 


6512 026136 


004767 


165634 


6313 026142 


103001 




6314 






6315 026144 


000421 




6316 






6317 






6318 






6319 






6320 026146 


005267 


155700 


6321 026152 


122702 


000023 


6322 026156 


001003 




6323 026160 


012701 


006520 


6324 






6325 026164 


000411 




6326 






6327 026166 


005^6 7 


155660 


6320 026172 


020427 


000277 



MOV 0177670, RO 

JSR PC.WTWLPR 

MOV 010., R4 

JSR PC, DELAY 

MOV *BUFBAS.R2 

MOV 0191. .R3 

JSR PC.DODMA 

BCC 50J 



(PASS THE LPR CONTENTS. 

iSET THE LPR CONTENTS TO 38.4K BAlJO. 

(PASS DELAY TIME OF 10 MILLI SECONDS, 

iWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED 

jPASS THE START OF THE DATA PATTERN TO TX. 

iPASS THE LENGTH OF THE DATA PATTERN. 

(TRANSMIT THE DATA PATTERN. 

(IF ERROR FOIJND DURING DMA THEN ABORT TEST. 



I • 



WAIT FOR DMA TO COMPLETE, THEN WAIT FOR THE LAST CHARACTER TO ARRIVE IN 
THE FIFO. 



INC ERRNBR 

MOV 01 70454, Rl 

MOV CSRA.R2 

JSR PCWAIBIS 

BCC 50J 

MOV 05, R4 

JSR PC, DELAY 



I SET ERROR NUMBER TO 5402. 

(PASS TIME-OUT VALUE OF 300 MILLI S^.CS. 

(PASS THE ADDRESS OF' THE CSR. 

(WAIT FOR DMA TO COMPLETE, TX_ACTION SET. 

I IF FIFO EMPTY. REPORT ERROR. ABORT THE TEST 

(PASS DELAY OF 5 MILLI SECS, 

(WAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



READ THE CONTENTS OF THE FIFO. IF ANY OF THE FOLLOWING CONDITIONS OCCUR 
REPORT THE ERROR ANO ABORT THE TEST( 

FIFO EMPTY TOO SOON. 

BMP CODE FOUND. 

XOFF CODE FOUND. 

EXTRA C192) CHARACTER FOUND IN FIFO. 



155726 2$: 



CLR R4 

MOV RBUFA.R5 

MOV 05403. , ERRNBR 

MOV CR5),R2 

BPL 50$ 

INC R4 



(CLEAR THE CHARACTER COUNT. 

(GET THE ADDRESS OF THE RECEIVER BUFFER REG, 

(SET ERROR NUMBER TO 5403. 

(GET THE ACTUAL DATA FROM THE FIFO. 

(FIFO EMPTY. ABORT TEST. 

(COUNT THE CHARACTER. 



t • 

J 

t 

t 

i - 



CHECK IK THE READ CHARACTER IS A BMP CODE. 
IF IT IS A BMP CODE SAVE IT ON THE QUEUE TO HE REPORTED LATER. AND 
ABORT THE TEST. 

INC ERRNBR (SET ERROR NUMBER TO 5404. 

JSR PC.CHKBMP (CHECK IF CHARACTER IS A BMP CODE. 

BCC 4$ (BRANCH IF NOT A BMP CODE. 

(REPORT ERROR "BMP CODE FOUND IN FIFO, TEST INVALIDATED". 

BR 8$ (REPORT THE ERROR AND ABORT THE TEST. 



I • 



I CHECK IF THE CHARACTER IS AN XOFF. REPORT THE ERROR IF ONE IS FOUND 



4$: INC ERRNBR 

CMPB 023, R2 

BNE Si 

MOV 0EM5402.R1 

(REPORT THE ERROR "FIFO 

BR 8$ 

6$i INC ERRNBR 

CMP R4,0191. 



(SET ERROR NUMBER TO 5405. 

(CHECK IF THE READ DATA IS AN XOFF 

(BRANCH IF NOT AN XOFF. 

(PASS THE MESSAGE TO BE REPORTED. 

BAD, ALARM SIGNAL DEFECTIVE". 

(GO REPORT THE ERRO*^ AND ABORT THE 



TEST 



(SET ERROR NUMBER TO 5406. 
(CHECK IF Wt HAVE READ ALL 



THE CHARACTERS. 



T13 
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6529 


026176 


001547 




6330 


026200 


011502 




6331 


026202 


100006 




6332 


026204 


012701 


006520 


6333 








6354 








6335 


026210 








026210 


104460 




6336 


026212 


000402 




6357 








6558 








t:>6^ 


026214 


004767 


170452 


6340 


026220 


005067 


154024 


6341 








6342 


026224 
026224 








026224 


104401 
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BNE 2$ »L00P BACK TO GET THE NEXT CHARACTER. 

MOV CR5).R2 »TRY TO READ AN EXTRA CHARACTER FROM THE FIFO, 

BPL 60$ jEXIT IF NGN FOUND. 

MOV OEM5402.R1 iPASS THE MESSAGE TO BE REPORTED. 
(REPORT THE ERROR "FIFO BAD, ALARM SIGNAL DEFECTIVE". 



SEQ 164 



8$: 


ERROR 






BR 


60$ 


30$: 
60$: 


JSR 
CLR 


PC.TSABRT 
CTRLCF 



I >>>>> ERRORS 5304 THRU 5306 <<<<<. 

TRAP CSERROR 
(EXIT THE TEST. 



< < ; < < 



1 >>>>> ERRORS 5402 AND 5403 

tREPORT TEST ABORTED. NON-TEST RELATED ERROR. 

i INDICATE THAT WE ARE NOT WITHIN A TEST. 



ENDTST 



L 10037: 



TRAP 



C$ETST 



J13 
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SEQ 165 



6344 
6545 
6346 
6347 
6348 
6349 
6350 
6351 
6352 
6353 
6354 
6355 
6356 
6357 
6358 
6359 
6360 
6361 

636? 



6363 
6364 
6365 
6366 
6367 
6368 
6369 
6370 
6371 
6372 
6373 
6374 
6375 
6376 
6377 
6578 
6379 
6380 
6381 
6382 
6383 
6384 
6385 
6386 
6387 
6388 
6389 
6390 
6391 
6392 
6393 
6394 
6595 
6396 
6397 



026226 
026226 
o;>6226 
026226 
026232 

026234 
026242 
026250 
026256 
026264 



026272 
026276 
026300 



026504 
026310 
026312 



012700 
104441 
000013 
012767 
012767 
012767 
012767 
012767 



004767 
105402 
000167 



004767 
103402 
000167 



000240 



000013 
177777 
000001 
012575 
006561 



154012 
154000 
155572 
155566 
155562 



165 720 
000414 

166160 
000402 



026316 004767 166256 
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- FIFO 3/4 LEVEL ACTIVE TEST 

THIS TEST VERIFIES THAT THE OUT'S FIFO 3/4 LEVEL ALARM SYSTEM 

BECOMES ACTIVE WHEN THE FIFO CONTAINS > 192 CHARACTERS. 

THE TEST COMPARES THE ACTUAL NUMBER OF XOFF (ASCII DC3) 

CHARACTERS THAT ARE FOUND IN THE FIFO WITH THE EXPECTED NUMBER. 

AN ERROR WILL BE REPORTED, IF THE COUNTS ARE FOUND TO DIFFER. 

ANY BMP CODE FOUND WILL INVALIDATE THE TEST AND CAUSE IT TO BE ABORTED. 

HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODE QUEUE. TO BE 

REPORTED LATER. 

THE CHARACTERS ARE TRANSMITTED ON THE FIRST AVAILABLE ACTIVE LINE, IN 

INTERNAL LOOPBACK MODE. 



t* 
I* 
!* 

t* 
I* 
1* 
I* 
J* 
!* 

;♦ 
1* 
t* 

;♦ 

BGNTST 

SETPRI #PRI05 (ALLOW LTC INTERRUPTS. 



Til:: 



MOV OfTaoisRC 

TRAP Ci-:^pr<i 
1 INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
iSET UP THE TEST NUMBER. (55) 
(INDICATE THAT WE ARE IN A TEST. 
I SET ERROR TYPE AS FATAL IN ERROR TABLE. 
(SET ERROR NUMBER TO 5501. 
J SET ERROR MESSAGE ADDRESS IN ERROR TABLE, 

\ RESET THE DUT TO A KNOWN STATE. REMOVE THE STATUS CODES FROM THE FIFO. 
I CLEAR TX AND RX INTERRUPT ENABLE BUf IN THE CSR. 
: THIS SUBROUTINE REPORTS ERROR >>>-»^ ^:.' <<<<<. 



TNUM 


-" TNUM ♦ 1 


MOV 


*TNUM»TSTNUM 


MOV 


*-l,CTRLCF 


MOV 


#1,ERRTYP 


MOV 


*5501. .ERRNBR 


MOV 


«EM5501,ERRMSG 



JSR 
BCS 
JMP 



PCCLNRST 
. +6 
60» 



iRtSEi THE OHU-11, REPOR i ANY ERRORS FOUND. 
(SKIP EXIT OF TEST IF NC FATAL ERROR FOUND. 
lEXIT TEST FATAl ERROR FOUND. 



J FIND AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 



JSR 
BCS 
JMP 



PC.KINACT 

. ^6 

60$ 



jFIND AN ACTIVE LINE. 

I SKIP EXIT OF TEST IF ACTIVE LINE FOUND. 

(EXIT TEST. 



INITIALIZE THE 256 BYTE DATA PATTERN. 
ENSURE THE DATA PATTERN IS FREE FROM XON' S OR XOFK'f, TO PREVENT ERRORS. 
NOTE: THE FIRST TWO CHARACTERS AND THE LAST TWO CHARACTERS WILL BE THE SAME. 



JSR 



PC.INDTPX 



(INITIALISE DATA PATTERN. 



026322 005267 155524 



TRANSMIT A 191 CHARACTER DATA PATTERN USING DMA, ON A SINGLE CHANNEL 
AT 38. 4K BAVX), 8 BITS PER CHARACTER. ODD PARITY, 2 STOP BITS. 

t SET INTERNAL LOOPBACK. ENABLE lAUTO AND RECEIVER ON THE SELbCTED LINE. 
i TRANSMIT THE FIRST 191 CHARACTERS ON THE FIRST AVAILABLE ACTIVE LINE. 

2«: INC ERRNBR jSET ERROR NUMBER TO 5502. 



C/DHVBO DHU-11 1 


FUNC TST 


PART 2 


HARDWARE TEST 




- FI3QL 


6398 026336 


012700 


000206 


6399 056532 


004767 


171214 


6400 026336 


012700 


177670 


6401 026342 


004767 


171234 


6402 026346 


012704 


000012 


6405 026552 


004767 


165704 


6404 026556 


010105 




6405 026360 


012702 


002650 


6406 026364 


012703 


000277 


6407 026370 


004767 


166004 


6408 026374 


103147 




6409 






6410 






6411 






6412 






6413 






6414 026376 


005267 


155450 


6415 0265.02 


012701 


170454 


6 416 026; 06 


016702 


153614 


6417 OrMi2 


004767 


171020 


6418 O.'^'V:-* 


103136 




6419 C._ ,'."' 


012704 


000005 


6420 0?.K>A'2A 


004767 


165632 


6^21 






422 






6423 






6424 026430 


005267 


155416 


6425 026434 


010501 




6426 026436 


012702 


002650 


6427 026442 


012703 


000001 


6426 026446 


004 767 


165726 


6429 026452 


103120 




6430 






6431 






6452 






6433 026454 


005267 


155372 


6434 026460 


012701 


170012 


6435 026464 


016702 


153536 


6436 0264 70 


004767 


170742 


6437 026474 


103107 




6438 026476 


012704 


000005 


6439 026502 


004767 


165554 


6440 






6441 






6442 






6443 026506 


012702 


002650 


6444 026512 


105022 




6445 026514 


020227 


003250 


6446 026520 


103774 




644 7 






6448 






6449 






6450 






6451 






6452 026522 


00526 7 


1S5324 


6.i55 026526 


010501 




6454 026530 


012702 


002650 
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MOV 


«206,R0 


JSR 


PC.WTWLNC 


MOV 


^177670, RO 


JSR 


PC.WTWi.PR 


MOV 


#10., R4 


JSR 


PC, DEL AY 


MOV 


R1,R5 


MOV 


*eijrBAS.R2 


MOV 


#191. ,R3 


JSR 


PC, DODMA 


BCC 


50$ 



K13 

115-1 



SEQ 166 



(PASS INTERNAL LOPBCK. ENABLE RX AND lAUTO. 

I INITIALISE THE LINE CONTROL REGISTER. 

iPASS THE LPR CONTENTS. 

I SET THE LPR CONTENTS TO 38 . 4K BAUD. 

iPASS DELAY TIME OF 10 MILLI SECONDS. 

iWAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 

I COPY THE LINE NUMBER. 

iPASS THE START OF THE DATA PATTERN TO TX. 

I PASS THE LENGTH OF THE DATA PATTERN. 

I TRANSMIT THE DATA PATTERN. 

; ABORT THE TEST IF ERROR FOUND DURING DMA TX. 

i WAIT FOR DMA TO COMPLETE, THEN WAIT FOR THE LAST CHARACTER TO ARRIVE IN 
; THE FIFO. 
! - 



INC ERRN6R 

MOV 0170454, Rl 

MOV CSRA,R2 

JSR PCWAIBIS 

BCC 50$ 

MOV #5.R4 

JSR PC. DELAY 



I SET ERROR NUMBER TO 5503. 

iPASS TIME-OUT VALUE OF 300 MILLI SECS. 

I PASS THE ADDRESS OF THE CSR. 

tUAIT FOR DMA TO COMPLETE. TX ACTION SET. 

J IF NO TX ACTION WAS RECEIVED. ABORT THE TEST 

jPASS DELAY OF 5 MILLI SECS. 

iWAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



TRANSMIT A NULL CHARACTER WHICH WILL CAUSE AN XOFF TO BE GENERATED. 



J - 



INC ERRNBR 

MOV R5,R1 

MOV #fiUFBAS,R2 

MOV «1,R3 

JSR PCDODMA 

BCC 501 



TX. 



I SET ERROR NUMBER TO 5504. 

iPASS THE LINE NUMBER. 

iPASS THE START OF THE DATA PATTERN TO 

jPASS THE NUMBER OF CHARACTERS TO TX. 

iTX A NULL CHARACTER TO CAUSE AN XOFF. 

t ABORT THE TEST IF ERROR FOUND DURING DMA TX 



[ • 



WAIT FOR THE DMA TO COMPLETE AND THE LAST CHAR TO ARRIVE IN THE FIFO 



INC ERRNBR 

MOV #170012, Rl 

MOV CSRA.R2 

JSR PCWAIBIS 

BLC 50$ 

MOV #5,R4 

JSR Pr.DEl AY 



iSET ERRUR NUMBER TO 5505. 

iPASS TIME-OUT VALUE OF 10 MILLI SECS. 

;PA5S THE ADDRESS OF THE CSR. 

tWAIT FOR DMA TO COMPLETE. TX_ACTION SET. 

iIF NO TX ACTION WAS RECEIVED. ABORT THE TEST 

iPASS DELAY OF 5 MILLI SECS. 

tWAIT FOR XOFF TO GET INTO THE FIFO, 



i * 



INITIALISE THE 2S6 BYTE DATA PATTERN TO ALL NULLii. 



) - 



4$ 



MOV 
CLRB 
CMP 
BLO 



tBUFBAS.R? 
(R2)» 

R2,#BUFMID 
4$ 



ilNITIALI^E THE 
i AIL NULLS. 
I 
) 



DATA PATTERN TO BE 



I TRANSMIT A 
i GENERATED, 



FURTHER 31 NULL CHARACTERS WHICH WILL CAUSE 31 XOFF'S TO BE 



INC ERRNBR 

MOV R5,R1 

MOV #BUFBAS.R2 



iSET ERROR NUMBER TO 5506. 

tPASS THE LINE NUMBtR. 

(PASS THE START OF THE DATA PATTERN TO TX. 



LI 3 
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SEQ 167 



6455 

6456 

6457 

6458 

6459 

6460 

6461 

646? 

6463 

6464 

6465 

6466 

6467 

6468 

6469 

6470 

6471 

64 72 

6473 

64 74 

6475 

64 76 

6477 

6478 

6479 

6460 

6481 

6482 

64f^3 

6484 

6485 

6486 

6487 

6488 

6489 

6490 

6491 

6492 

6493 

6494 

6495 

649*i 

6497 

6498 

6499 

6500 

6501 

6502 

6503 

6504 

6505 

6506 

6507 

6508 

6509 

6510 



026534 
026540 
026544 



026546 
026552 
026556 
026562 
02656U 
026570 
026574 



C26600 
026602 
0?6604 
026610 
026616 
026622 
026626 
026630 



026632 
026636 
026642 



026644 
026650 
026652 



026654 
026660 



026662 
026670 
0266/4 
0266 .'6 
026704 

026 710 
026710 



012703 
004 767 
105063 



005267 
012701 
016702 
004767 
103052 
012704 
004767 



005004 
005003 
012701 
012767 
016702 
004767 
103032 
005204 



005267 
004 767 
103422 



122702 
001001 
005203 



020427 
002753 



012767 
022703 
001411 
01276 7 
012701 



104460 



000037 
165634 



MOV 
JSR 
BCC 



V?31. .t^3 
PC.DODMA 
50 i 



iPASS THE LENGTH OF THE DATA PATTERN. 

I TRANSMIT THE DATA PATTERN. 

I ABORT THE TEST IF ERROR FOUND DURING DMA TX 



155300 
170454 
153444 
170650 

000005 
165462 



J WAIT FOR THE XOFF ' S AND THE NULL CHARACTERS 
t THERE ARE NOW 255 CHARACTERS IN THE FIFO. 

i - 



TO BE RECEIVED. 



INC 


ERRNBR 


MOV 


0170454. Rl 


MOV 


CSRA.H2 


JSR 


PC.WAIBIS 


BCC 


50$ 


MOV 


05, RA 


JSR 


PC. DEL AY 



J READ THE FIFO UNTIL 
t THAT ARE FOUND. 



(SET ERROR NUMBER TO 5507. 

iPASS TIME-CUT VALUE OF 300 MILLI SECS. 

iPASS THE ADDRESS OF THE CSR . 

jUAIT FOR DMA TO COMPLETE, TX„ACTION SCT, 

ilF NO TX_ACTION WAS RECEIVED. ABORT THE TEST 

iPASS DELAY OF 5 MILLI SECS. 

;WAIT FOR XOFF TO GET INTO THE FIFO. 

EMPTY, COUNTING THE NUMBER OF XOFF CHARACTERS 



170001 
012604 
153406 
17C610 



155234 6$s 



CLR R4 

CLR R3 

MOV *170001.R1 

MOV 05508 . .ERRNBR 

MOV RBUFA,R2 

JSR PC.WAIBIS 

BCC 50$ 

INC R4 



(CLEAR CHARACTER COUNTER. 

I CLEAR THE XOFF FOUND COUNTER. 

(INDICATE TO TEST DATA. VALID BIT. TIME OUT IMS 

(SET UP ERROR NUMBER EACH TIME AROUND THE L COP 

(INDICATE TO CHECK RECEIVE BUFFER REGISTER. 

(WAIT FOR RECEIVED CHAR OR TIME-OUT. 

(GO REPORT ERROR IF FIFO EMPTY. 

(COUNT THE CHARACTER, 



( ♦ 



I CHECK FOR BMP CODES IN THE FIFO, ABORT THE TEST IF ANY AMh FOUND. 
SAVE THE BMP CODE ON THE QUEUE TO BE REPORTED LATER. 



155214 
165134 



000023 



INC 
JSR 
BCS 



ERRNBR 
PC . CHKBMP 
12$ 



; ♦ 



CHECK FOR XOFF CHARACTER. 



t - 



8$: 



CMPB 
BNE 
INC 



023. R2 

10$ 

R3 



(SET ERROR NUMBER TO 5509. 

(CHECK IF WE HAVE GOT A BMP CODE, 

(GO REPORT THE ERROR IF WE FOUND A BMP CODE 



(CHECK IF THE RECEIVED CHARACTfR WAS AN XOFF 
(BRANCH IF CHARACTER WAS NOT AN XOFF. 
(INCREMENT XOFF FOUND COUNT. 



CHECK IF ALL THE CHARACTERS INCLUDING THE XON HAVE BEEN RdMOVED. 



000400 



10$: 



CMP 
BLT 



H4 , 0256 
6$ 



(CHECK IF WE HAVE REMOVED ALL THE lHARACTER'j. 
)G0 GET THE NEXT CHAR IF WE HAVE NOT FINISHED 



012606 
000040 

011762 
006520 



155162 
155152 



CHECK IF THE CORRECT NIHIBER OF XOFF'S WERE FOUND IN THE FIFO. 
REPORT ERROR IF COUNT IS INCORRECT. 



12$: 



MOV 


05510. .ERRNBR 


CMP 


032. .R3 


f FQ 


60$ 


MOV 


OtR0503.ERRBLK 


MOV 


0EM5402,R1 


REPORT 


THE ERROR "FIFO 


tRRUR 





(SET UP THE ERROR NUMBER TO 5510. 

(COMPARE EXPECTED XOFF COUNT WITH ACTUAL COUNT. 

(EXIT TF'- 1 IF SUCCESS. 

(SELECT ! CORRECT ERROR REPORTING ROUTINE. 

jPASS n\k MESSAGE TO BE REPORTED. 

BAD, ALARM SIGNAL DFFECTIVF". 

J >>ii:» ERROR < <i< * . 

TRAP C$ ERROR 



M13 



CZOHVBO OHU- 



ruNC TST PART2 MACRO M1200 
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SEQ 168 



HARDWARE TEST 




- FI3QLA - 








6511 026712 


000402 






BR 


60$ 


651^ 












6513 026714 


004 767 


167752 


50 J J 


JSR 


PC. TSABRT 


6514 026720 


005067 


153324 


60$: 


CLR 


CTRLCF 


6515 












6516 026724 








ENDTST 




026724 












026724 


104401 











I ABORT THE TEST. 

(REPORT TEST ABORTED. ERROR SHOWS REASON 
1 INDICATE THAT WE ARE NOT WITHIN A TEST. 



L10040: 



TRAP 



C$ETST 



N13 



czdhvbo dhu-11 tunc tst part2 macro ml^oo 15-mar-84 09:28 page 116 
hardware: test - fisqai - 



SEQ 169 



6518 

6bl9 
6520 

65^^ 

652? 
6525 
6524 
652S 
6526 
6527 
6528 
6529 
6530 
6531 
6532 

6533 



6534 
6535 
6556 
6537 
6538 
6539 
6540 
6541 
6542 
6543 
6544 
6545 
6546 
6547 
6548 
6549 
6550 
6551 
6552 
6553 
6554 
6555 
6556 
6557 
6558 
6559 
6560 
6561 
6562 
6565 
6564 
6565 
6566 
656 7 
6568 
6569 
65/0 
6571 



026726 
026/26 
026726 
026726 
026732 

026734 
026742 
026750 
0267S6 
026764 



026 //2 
026776 
027000 
027004 



027004 
027010 
027012 



012700 
104441 
000014 
012767 
01276? 
012767 
012767 
012767 



004 767 
103402 
000167 



004 767 
105402 
000167 



02/022 
027026 
027032 



005267 
012/00 
004767 



. SBTTL HARDWARE TEST - FI3QAI - 

■ FIFO 3/4 ALARM LEVEL ACTIVE/INACTIVE TEST - 

THIS TEST VERIFIES THAT THE DUT'S FIFO 3/4 LEVEL ALARM SYSTEM 

BECOMES ACTIVE AND INACTIVE AT THE CORRECT LEVELS. 

ANY BMP CODE FOUND WILL INVALIDATE THE TEST AND CAUSE IT TO BE ABORTEO. 

HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODE QUEUE. TO BE 

REPORTED LATER. 

THE CHARACTERS ARE TRANSMITTED ON THE FIRST AVAILABLE ACTIVE LINE. IN 

INTERNAL LOOPBACK MODE. 



000240 



BGNTST 

J ALLOW LTC INTERRUPTS. 



T12: : 



ii'» 



1777/7 
OOOOC 1. 
01274 .. 
0066^5 



153312 
153300 
155072 
155066 
155062 



SETPRI 0PRI05 



TNUM -" TNUM • 1 
MOV dTNUM.TSTNUM 
MOV #-l.CTRLCF 
MOV *1,ERRTYP 
MOV 05601. .ERRNBR 
MOV 0EM5601.ERRMS6 



MOV OPRI05,R0 
TRAP CJSPRI 

i INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

;SET UP THE TEST NUMBER. C56) 

I INDICATE THAT UE ARE IN A TEST. 

jSET ERROR TYPE AS FATAL IN ERROR TABLE. 

iSET ERROR NUMBER TO 5601. 

(SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 



J RESET THE OUT TO A KNOWM STATE. REMOVE THE STATUS CODES FROM THE FIFO. 
CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORtS ERROR >>>>> 5601 <<<<<. 



1652-'0 
000412 

165460 
000400 



JSR 


PC.CLNRST 


BCS 


2i 


JMP 


60$ 



2*: 



(RESET THE DHU-11, REPORT ANY ERRORS FOUND. 
I SKIP EXITING TEST A SUCCESSFUL RESET. 
(EXIT THIS TEST. 



027016 004767 165556 



FIND AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 

;FIND AN ACTIVE LTNE. 

jSKIP EXIT OF TEST IF ACTIVE LINE FOUND. 

lEXIT TEST. 

INITIALIZE THE 256 BYTE DATA PATTERN. 
ENSURE THE DATA PATTERN 15 FREE FROM XON' S OR XOFK'S TO PREVENT ERRORS. 
NOTE: THE FIRST TWO CHARACTERS AND THE LAST TWO CHARACTERS WILL BE THE SAME. 



JSR 


PC.FINACT 


BCS 


. »6 


JMP 


60* 



JSR 



PC.INDTPX 



.•INITIALISE THE DATA PATTERN. 



155024 
000206 
170514 



TRANSMIT A 256 CHARACTER DATA PATTERN USING DMA, ON A SINGLE CHANNEL 
AT 38. 4K BAUD, 8 BITS PER CHARACTER. ODD PARITY. 2 STOP BITS. 

! SET INTERNAL LOOPBACK. ENABLE lAUTO AND RECEIVER ON THE SEL.ECTED L INt" . 
J TRANSMIT THE FIRST 191 CHARACTERS ON THE FIRST AVAILABLE ACTIVE LINE. 

INC ERRNBR iL_T EHHOH NUMBER TO 5602. 

MOV «206.R0 [PASS INTERNAL LOPBCK. ENABLE RX AND lAUTO. 

JSR PC.WTWLNC ;INITILAISE THE LINE CONTROL REGISTER. 



1.3 1 ^1 



CZDHVBO DHU U 
HARDWrtRt TtST 



65 7^ 
6575 
6S74 
6575 
6576 
6577 
65 78 
^5 7«^ 
6580 
6581 
658^ 
6585 
6584 
6585 
6586 

658 7 
6588 
6589 
6590 
6591 
659^ 
6595 
6594 
6595 
6596 

659 7 
6598 
6599 
6600 
6601 
660c> 
6605 
6604 
6605 
6606 
660/ 
6608 
6609 
6610 
6611 
66l«> 
6615 
6614 
6615 
6616 
661 7 
6618 
6619 
66^0 
6f2l 
6622 
6625 
6624 
6625 
6626 
66<^/ 
6626 



027056 
027042 
027046 
027052 
027056 
027060 
02 7064 
02 7070 
027074 



02 7076 
027102 
027106 
027112 
027116 
027120 
027)24 



027150 
02 7154 
027156 
027142 
027146 
0271',2 



rUNC TST 



012700 
004 767 
012704 
004 767 
010105 
012702 
012703 
004767 
103146 



00526 7 
012701 
016702 
004/67 
105155 
012704 
004767 



005267 
010501 
012702 
012705 
004 76 7 
105117 



027154 
02 7160 
02 7164 
027170 
02 7174 
02 7176 
02 7202 



005267 
012701 
016702 
004 767 
103106 
012704 
004 767 



PART2 MACRO 
■ FI5QAI 

177670 
170534 
000012 
165204 

002650 
000277 
165504 



Ml 



200 
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StQ 170 



croi 

HARI 



027212 

02 7^14 
027216 

02 7222 
027226 
02 7252 
02 72 56 
027242 



1S4750 
170454 
153114 
170520 

000005 

165132 



154716 

002650 
000001 

165226 



154672 
170012 
153056 
170242 

000005 
165054 



02/206 010577 155014 



005005 
005004 
012705 000500 



012700 
012701 
016^02 
004/6 7 
103046 



000005 
170005 
152 7 72 
170X'74 



MOV *177670,R0 

JSR PC.WTWLPR 

MOV #10.. R4 

JSR PC. DELAY 

MOV RI.R5 

MOV #eUF8AS.R2 

MOV ♦191. ,R5 

JSR PC.DOOMA 

BCC 50$ 



(PASS THE LPR CONTENTS. 

iSET THE LPR CONTENTS TO 58. 4K BAUD. 

iPASS DELAY TIME Of 10 MILLI SECONDS. 

FOR LNCTRL AND LPR REGS TO BE UPDATED 
LINE NUr«ER. 

START Of THE DATA PATTERN TO TX, 
LENGTH or THE DATA PATTERN. 
THE DATA PATTERN. 
ERROR FOUND DURING DMA TX. 



I WAIT 
iCOPY 
(PASS 
iPASS 

I TRANSMIT 
lEXlT IF 



THE 
THE 
THE 



I WAIT FOR DMA TO COMPLETE. THEN WATT FOR THE LAST CHARACTER TO ARRIVE IN 
I THE FIF'^. 



I • 



INC ERRNBR 

MOV #170454. Rl 

MOV CSRA,R2 

JSR PC.WAIBIS 

BCC 501 

MOV ♦5,R4 

J:R PC, DELAY 



I SET ERROR NUMBER TO 5605. 

iPASS TIME-OUT VALUE QF 500 HILL I =iECS. 

(PASS THE ADDRESS OF THE C5R. 

iWAIT FOR DMA TO COMPLETE, TX, ACTION SET. 

iBRANCH IF FIFO EMPTY, ABORT THE TEST. 

iPASS DELAY OF 5 MILLI SECS. 

IWAIT FOR LAST CHAR TO ARRIVE IN THE FUO 



TRANSMIT A NULL CHARACTER WHICH WILL CAUSE AN XOFF TO BE GENERATED. 



INC ERRNBR 

MOV R5.RI 

MOV ♦6UFBAS.R2 

MOV tl.RS 

JSR PC.DOOMA 

BCC 501 



I SET ERROR NUMBER TO 5604. 

(PASS THE LINE NUMBER. 

iPASS THE START OF THE DATA PATTERN TO TX. 

iPASS THE NUMBER OF 

|TX A NULL CHARACTER TO CAUSE AN XOFF . 

lABORT THE TEST IF ERROR FOUND DURING DMA TX. 



I ♦ 



I WAIT FOR THE XOFF TO BE RECEIVED BEFORE CONTINUING THE TEST. 



I ■ 



INC ERRNBR 

MOV #170012. Rl 

MOV CSRA.R2 

JSR PC.WAIBIS 

BCC 501 

MOV #5.R4 

JSR PC. DELAr 

MOV R5.8CSRA 



I SET ERROR NLf«ER TO 5605. 

iPASS TIME-OUT VALUE OF 10 HILLI SECS. 

iPASS THE ADDRESS OF THE CSR . 

iWAIT FOR DMA TO COMPLETE. TX ACTION SET. 

iIF NO TX ACTION WAS RECEIVED. ABORT THE TEST, 

iPASS DELAY OF 5 MILLI SECS. 

iWAIT FOR XOFF '0 GET INTO THE MFO. 

iSELECT THE LINE READf FOR TRANSMISSION. 



READ THREE CHARACTERS. TRANSMIT ONE CHARACTER UNTIL THE FIRST 192 CHARACTERS 
HAVE BEEN READ FROM THE FlfO. IE UNTIL THE HALF LEVEL IS REACHED. 

THEN READ THE FIFO UNTIL EMPTt. 
COUNT ALL XOFF'S THAT ARE DETECTED. 



4t 



CLR R5 

CLR R4 

MOV #192.. R5 

MOV #5,R0 

MOV #i:0OO5.Rl 

MOV RBUf A.R2 

J'.H PCWAIBIii 

aCC lAI 



iCLEAR the TX FLAG. 

iCLEAR THE CHARACTER COUNTER 

iSET UP READ COUNTER FOR THE 



FIRST 192 CHAW 



iSET READ COUNTER. 

lINOICATE TO TEST DATA.vALID BIT. TIME. Oi.'T 
iINOlCATf TO CHECK RECflVt BU»>ER REUiiilLR. 
(WAIT fOR RKtIVED CHAR OR T ^Mt OV^ 
lEXlT LOOP XE TIME-OUT, KtKU tMPTl. 



■)Mii» 



fi^BKigfit'^'iVsf 



CI 4 



I KUNC TST P 



"^li 



QAI 
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SEQ 171 



66J0 
6b51 
6652 
66-? 5 
6654 
6655 
6656 

665 7 
6653 
6659 
6640 
6641 
664? 
664 5 
6644 
6645 
6646 
664 7 
664 fl 
6649 
6650 
6651 
6652 
6655 
6654 
6655 
6656 
6657 
t,S58 
6659 
6660 
6661 
(►66f? 
6o6 5 
6664 
6665 
6666 

666 7 
6668 
6669 
66 70 
66 71 
66 7? 
6675 
66 74 
66 75 
66 76 
6677 
6678 

66 79 
6680 
6681 
6682 
668 5 
6684 



02 7244 
027246 
027250 
027252 



02 7256 
027264 
027270 



027272 
027276 
027300 

027302 
027504 
027506 
027310 
027512 
027320 



027522 
027526 
027332 
02 7536 
027342 
027344 
027550 
02 7554 
027556 



027360 
02 7566 
027372 
02 75 74 

02 7402 

02/406 
02 7406 
027410 

02 7412 
027416 

027422 



005500 
005505 
005002 
052705 



122702 
OOlOOl 
005204 

005700 
001550 

005705 
100744 
112777 
010446 



00526 7 
012701 
016702 
004767 
103025 
012704 
004 767 
012604 
000721 



100000 



012767 012746 
004 767 164506 
105A46 



012767 
02042 7 
001411 
012767 
012701 



104460 
000402 

004 76 7 
005067 



000025 



000000 152714 



154524 
170012 
152670 
170074 

0OOO05 
164706 



012750 
00007? 

011762 
006520 



16 7254 
152626 



DEC 
DEC 
8GT 
BIS 



RO 
R5 
8» 
OtiITl5.R5 



lOECREMENT READ COUNTER. 

(DECREMENT CHAR COUNTER. 

iSKIP DISBL'G TX IF riRST 192 CHARS NOT READ, 

iDISABLE ANY FU?TKER TRANSMISSIONS. 



CHECK ir THE READ CHARACTER IS A BMP CODE, 
IF IT IS A BMP CODE SAVE IT ON THE QUEUE TO BE REPORTED LATER. AND 
ABORT THE TEST. 



154566 8»: 



MOV •5606..ERRNBR 
JSR PC.CHKBMP 
BCS 16» 



(SET UP ERROR NUMBER EACH TIME AROUND LOOP. 

(CHECK IF CHARACTER IS A BMP CODE. 

iGO REPORT ERROR AND ABORT TEST IF BMP FOUND 



I CHECK FOR XOFF CHARACTER. U ONE IS FOUND. COUNT IT. 

I TRANSMIT A NULL CHARACTER UNTIL THE FIRST 192 CHARS HAVE BEEN READ. 



101 1 



12l! 



CMPB 


#25, R2 


BNE 


12t 


INC 


R4 


TST 


RO 


BNE 


61 


TST 


R5 


BMI 


4t 


MOVB 


•O.SFDATA 


MOV 


R4 . C jP ) 


( WAIT FOR 


THE CHARACTER 


I * 

INC 


ERRNBR 


MOV 


4170012. Rl 


MOV 


CSRA.R2 


JSR 


PC.WAIBI5 


DCC 


501 


MOV 


•5.R4 


JSR 


PC, DELAY 


MOV 


(SP)».R4 


BR 


4t 



iCHECK IF THE RECEIVED CHARACTER WAS AN XOFF. 
iBRANCH IF CHARACTER UAS NOT AN XOFF. 
i INCREMENT THE XOFF CHAR FOUND COLfJTER. 

iCHCCK READ COUNT, TO SEE IF A CHAR CAN BE TX. 

iBRANCH IF 3 CHARS NAVE NOT TET BEEN READ. 

iCHCCK THE TRANSMISSION ENABLED FLAG. 

ISKIP TRANSMITTING A CHARACTER IF TX DISABLtU. 

|TX A NULL CHARACTER. 

iSAVE THE XOFF COUNT ON THE STACK. 

TO BE RECEIVED BEFORE CONTINUING THE TEST. 



I SET ERROR NUMBfR TO 560 7. 

iPASS TIME-OUT VALUE OF 10 MILLI SEC5 

(PASS THE AOORESS OF THE CSR. 

iUAIT FOR DMA TO COMPLETE. TX ACTION 

I IF NO rx. ACTION WAS RECEIVED. ABORT 

iPASS DELAY OF 5 MILL I SECS. 

iWAIT FOR XOFF TO GET INTO THE UFO. 

iRESTORE THE XOFF COUNT, 

iGO RESET THE READ COUNT AND GET NEXT 



SET 

THE. 



TEST 



CHAR. 



I CHECK IF THE CORRECT NUCulER 0> XOFF'S WERE FOUND IN THE. FIFO 
I REPORT ERROR IF COUNT IS INCORRECT. 



154464 14 It 

154454 



601 i 



MOV 

CMP 
BEQ 

MOV 

MOV 

(REPORT 
tRROR 

BR 

JSR 

ClR 

ENOTST 



•5608. .ERRNBR 

R4.»65. 

601 

*ER0505,ERRBLK 

•EM5402.RI 

THE FRROR "FIFO 



60 1 

PC.T3ABRT 
CTRLCF 



iSE. ERROR NUMBER TO 5608. 

(COMPARE THE EXPECTED AND ACTUAL XOf F COUNTS. 

(EXIT TEST IF SUCCESS. 

(SELECT THE CORRECT ERROR REPORTING ROUTINE. 

(PASS THE MESSAGE TO BE REPORIEO. 

BAD, ALARM SIGNAL OEFtCTIVE". 

( > >>> > ERROR < < << « . 

TRAP CURROR 

(EXIT THIS TEST. 

(REPORT TtST AdORTED. ERROR • INOICATfs FAULT. 
(INDICATE THAT WE ARE NOT WITHIN A TEST. 



D 1 4 
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0^M,\' L 10041: 

o'e7Aee io44oi trap csetst 



hl4 



C^OHVBO DKi 11 


rUNC TbT 


PART2 


MACRO t 


HARDWARt TtST 




- FIHAVL - 


6686 








^687 








6c38 








6689 








66*^0 








6691 








669.-^ 








6695 








6694 








6695 








6696 








6697 








6696 








6699 








6700 027424 








027424 








6701 027424 








027424 


012700 


000240 




027430 


104441 






6702 


000015 






6703 027432 


012767 


000015 


152614 


6704 027440 


012767 


177777 


152602 


6705 027446 


012767 


OOOOOl 


154374 


6706 027454 


012767 


013105 


154370 


6707 027462 


012767 


006702 


154364 


6706 027470 


012767 


011762 


154360 


6/09 








6710 








6711 








6712 








6713 








6714 027476 


004767 


164514 




6715 027502 


103402 






6716 027504 


000167 


000364 




6717 027510 








6718 








6719 








6720 








6721 027510 


004 76 7 


164754 




6722 027514 


103167 






6723 








6724 








6. 25 








6726 








672^ 








6726 027516 


004767 


165056 




6 729 








6730 








6751 








673? 








6755 








6754 








6 7 5'> 








6 7 56 








6/57 








6/58 027522 


005.^6 7 


154 524 




6739 027526 


004 76 7 


167014 
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.SBTTL HARDWARE TEST - FIHAVL - 

- FIFO HALF LEVEL ACTIVE/INACTIVE TEST 

THIS TEST CHECKS THAT THE OUT'S FIFO HALF LEVEL ALARM SYSTEM 

BECOMES ACTIVE AND INACTIVE AT THE CORRECT LEVELS. 

ANY BMP CODE FOUND WILL INVALIDATE THE TEST AND CAUSE IT TO BE ABORTED. 

HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODE QUEUE. TO BE 

REPORTED LATER. 

THE CHARACTERS ARE TRANSMITTED ON 'HE FIRST AVAILABLE ACTIVE LINE. IN 

INTERNAL LOOPBACK MODE. 

BGNTST 

lAlLOW LTC INTERRUPTS. 



SEQ 173 



T13: : 



SETPfll ^RI05 



TNUM «" TNUM ♦ 1 

MOV *TNUM,TSTNUM 

MOV ^-l.CTRLCF 

MOV ♦l.ERRTYP 

MOV ^5701. .ERRNBR 

MOV ♦EM5701,ERRMSG 

MOV *€R0503,ERRBLK 



MOV OPRIOS.RO 

TRAP CJSPRI 

(INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

iSET UP THE TEST NUMBER. (57) 

I INDICATE THAT WE ARE IN A TEST. 

I SET ERROW TYPE AS FATAL IN ERROR TABLb . 

;SET ERROR NU^BER TO 5701. 

I SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

I SELECT THE ERROR REPORTING ROUTINE. 



I RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 
» CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR, 
I THIS SUBROUTINE REPORTS ERROR >>*>> 5701 <<<<<. 

JSR PC.CLNRST jRESET THE DHU 11. REPORT ANt triRORS FOUND. 

BCS 2% (SKIP EXITING TEST A SUCCESSFUL RESET. 

JMP 60$ (EXIT THIS TEST. 
2$: 

I (-INO AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 



JSR 
BCC 



PC.FINACT 
601 



,FINO AN ACTIVf LINE . 

iEXiT IF NO ACTIVE LINES AVAILABLE. 



i INITIALIZE THE 256 BYTE DATA PATTERN. 

J ENSURE THE DATA PATTERN IS FREE FROM XON' S OR XOFF'S TO PREVENT ERRORS, 

1 NOTE! THE FIRST TWO CHARACTERS ANO THE LAST TWO CHARACTERS WILL BE THE SAME, 



JSR 



PC.INOTPX 



iINITIALISE THE DATA PATTERN. 



I * 

I FILL THE FIFO AND THE UART'S 5 CHAR BUf'FER Br TRANSHITTINC 225 CHARS 

I CIE 225 » 34 XOFF'S). TRANSMIT DATA PATTERN USING DMA. ON A SINGLE CHANNEL 

i AT 38. 4K BAUD. 8 BITS PER CHARACTER, ODD PARITY. 2 STOP BITS. 

» - 

I SET INTERNAL LOOPBACK, tNABLE lAUTO AND RECEIVER ON THE SEUCUD LINE. 
I TRANSMIT THE 225 CHARACTERS ON THE r IRST AVAILABLE ACTIVE LINE. 

INC ERRNBR jSET ERROR NL»16Efi TO S702. 

JSR PC.SETPAH iSET UP PARAMETERS FOR TRANSMISSION. 



S^RB^S8f°7^s^^ ' 


rUNC TST 


PART2 MACRO 
■ FIHAVL - 


6740 027552 


012700 


000541 


6741 027536 


004767 


167242 


6742 027542 


103152 




6743 027544 


010105 




6744 






6745 






6746 






6747 






6748 027546 


005267 


154300 


6749 027552 


004767 


167734 


o750 027556 


103144 




6751 






6752 






6 753 






6754 






6755 






6 756 027560 


005267 


154266 


6757 027561 


012700 


000202 


6758 027570 


004767 


166060 


t759 027574 


103135 




>760 02 7576 


0O5267 


154250 


6:61 027602 


005701 




6762 027604 


001125 




6763 






6764 






6765 






6766 






6767 027606 


010577 


152414 


6768 027612 


112777 


000000 15241 


6769 02 7620 


005267 


1S4226 


6770 027624 


004767 


167662 


6771 027630 


103117 




6 7 72 






6 7 73 






6-'/4 






677S 027632 


005267 


15^214 


6776 027636 


012700 


0OOO03 


6777 027642 


004 767 


166006 


6??S 027646 


103110 




6779 027650 


0052o7 


154176 


6780 027654 


005701 




6781 027656 


001102 




6 782 






6783 






6784 






6/85 027660 


012 700 


000076 


6786 027664 


010501 




6 78 7 02 7666 


00S267 


154160 


6788 02 7672 


004 76 7 


167106 


678^ 027676 


103074 




6 790 






6791 






6 792 






6 795 






b794 






6 795 02 7 700 


00526 7 


154 14f, 


6796 027704 


004767 


167602 
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SEQ 174 



MOV 
JSR 
BCC 

MOV 



fl225. ,R0 
PCTXDATP 
50 1 
R1.R5 



iPASS LENGTH OF DATA PATTERN. 
J TRANSMIT DATA PATTERN. 
I EXIT If ERROR FOUND DURING TX. 
I COPY THE LINE NUMBER. 



t » 

I WAIT FOR DMA TO COMPLETE, THEN WAIT FOR THE LAST CHARACTER TO ARRIVE IN 

1 THE FIFO. 

INC ERRNBR jSET ERROR NUMBER TO 5703. 

JSR PC.WAITTX (WAIT FOR TRANSMISSION TO COMPLETE, 
BCC 50» iGO REPORT ERROR IF TX FAILED TO COMPLETE. 



J * 



READ THE FIRST 130 CHARACTERS FROM THE. FIFO» IF ANY XON' S AHE FOUND 
I REPORT THE ERROR. Lf ANY BMP CODES ARE FOUND THEN SAVE THEM ON THE QUEUE 
I AND ABORT THE TEST. 



I 



I SET ERROR NUr«ER TO 5 704. 

(CAr.S THE NUnetR or chars to READ. 

jREAD THE FIRST 130 CHARS FROM THE FIFO 

J GO REPORT ERROR IF BMP CODE FOUND. 

jSET ERROR NUMBER TO 5705. 

I check if Afi XON WAS FOlM). 

iGO REPORT ERROR IF AN XON UAS FOUND. 



1 TRANSMIT A NULL CHARACTER (WHICH CAUSES AN XOFF TO BE GENERATED). 



INC 


ERRNBR 


MOV 


^130. ,R0 


JSR 


PC.REMDBX 


BCC 


50* 


INC 


ERRNBR 


TST 


Rl 


BNE 


30$ 



MOV 

MOVB 

INC 

JSR 

BCC 



R5,aCSRA 

*0.8F'DATA 

ERRNBR 

PC.WAITTX 

501 



I SELECT THE LINE HEADY FOR TRANSMISSION. 

i TRANSMIT A NULL CHARACTER. 

iSFT ERROR NUMBER TO 5706. 

■WAIT FOR TX TO COMPL e TE . 

iGO REPORT ERROR U TX DID NOT COMPLETE. 



READ THREE CHARACTERS. TO CAUSE THE XON TO BE GENERATED. 



INC 
MOV 

JSR 

BCC 
INC 
TST 

BNE 



ERRNBR 

03, RO 

PC.READBX 

501 

ERRNBR 

Rl 

401 



iStT ERROR NUI«FR TO 5 707. 

.SET THE READ COl^T TO 5. 

iREAD 5 CHARACTERS FROM THE UFO. 

iGO REPORT ERROR IF FIFO EMPTir. 

J SET ERROR Nl»16ER TO 5708. 

J CHECK IF AN XON WAS FOUND. 

I GO REPORT ERROR IF AN XON WAS FOLiNO 



1 TRANSMIT 62 CHARACTERS TO BRACKET THE XON AND FILL THE! FIFO WITH 191 CHARS 



MOV 
MOV 
INC 

JSR 

BCC 



062 . , RO 

R5.R1 

t-RRNBR 

PC.TXDAYP 

50J 



iPASS LENGTH OF OATfl PATTfRN. 

jPASS THE, LINE NUMBER. 

jSFT ERROR NUMBER TO 5709. 

I TRANSMIT DATA PATTERN. 

I EXIT IF ERROR FOUND OUHINC; TX 



I WAIT FOR DMA TO COMPLETE, THEN WAIT FOR THE LAST CHARACTER TO ARRIVE IN 
J THE FIKO. 
1 • 

TNC FRRNBR 
JSR PC.WAITTX 



;SfT ERROr^ Nt.;MeER TO 5U0. 
tWAlT FOR TX TO COMPLETE* 



GI4 



CZOHVBO DHU U 
HARDWARF lE^J 



FUNC TST 



6797 

6796 

6^99 

6800 

6801 

680:? 

680.^ 

6804 

6805 

6806 

6807 

6808 

6809 

6810 

6811 

6812 

6813 

6814 

6815 

6816 

6817 

6818 

6819 

6820 

6821 

682? 

6823 

6824 

6825 

6826 

6827 

6828 

6829 

6850 

6851 

6832 

6833 

6834 

6835 

6836 

6857 

6838 

6839 

6840 

6841 

6842 

6843 
6844 
6845 
6846 
684/' 
6848 



027710 105067 



027712 
027716 
027 722 
027726 
027730 
027754 
027756 
027740 
027744 
027750 
027754 
027756 
027762 
027764 
027770 
0277 72 
027776 
030000 
030002 
0300O6 
030012 
030014 
050020 
030022 
030026 



030050 
050034 
030040 
050044 
050046 
050052 
050054 
050056 
050060 

050O<>4 
050064 
050066 

050070 
0500 74 

050100 
050100 
030100 



005267 
012700 
004 767 
105060 
005267 
005701 
001052 
005267 
012701 
016703 
011302 
120227 
001040 
005267 
011502 
120227 
CO 1 052 
011502 
005267 
120227 
001024 
00526 ? 
011502 
120227 
001016 



012700 
005267 
004767 

i05o;i 

005267 
005701 
001C03 
OO0406 
012701 



104460 
000402 

004 767 
005067 



104401 



PART 2 MACRO 
- FIHAVL - 
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SEQ 175 



154134 
000176 
165726 

154116 



154106 
006520 
152254 

000000 

154062 

000023 

154044 
000021 

154052 

000000 



0000 .'5 
154012 
165610 

154000 



006520 



166576 
152150 



BCC 



50 i 



iGO REPORT ERROR IF TX FAILED TU COMPLETE 



READ THE FIRST 126 CHARACTERS. 

READ THE NEXT 4 CHARACTERS AND CHECK IF THEY ARE IN THE FOLLOWING ORDER 
i NULL, XOFF. XON, NULL. 

SET ERROR NUMBER TO 5711. 

SET UP READ COUNTER. 

READ THE FIRST 126 CHARS. 

GO REPORT THE ERROR IF FIFO EMPTY. 

SET ERHOR NUMBER TO 5712. 

CHECK IF AN XON WAS FOUf^. 

GO REPORT ERROR IF AN XON WAS FOl»ND. 

SET ERROR NUMBER TO 5715. 

PASS THE MESSAGE TO BE REPORTED. 

GET THE RECEIVER BUFFER ADDRESS. 

READ THE NULL CHARACTER FROM THE FIFO. 

CHECK IF IT IS A NULL CHARACTER. 

GC REPORT THE ERROR IF NOT THE SAME. 

SET ERROR NUr«ER TO 5714. 

READ THE XOFF FROM Th€ FIFO. 

CHECK IF THE READ CHAR 15 AN XQFF . 

GO REPORT .;•«: ERROR IF NO! THE SAME. 

READ THE XON FROM THE FIFO. 

SET ERROR NUMBER TO 5715. 

CHECK IF THE READ CHARACTER IS AN XON. 

GO REPORT THE ERROR IF NOT THE SAME. 

SET ERROR NUMB'iR TO 5716. 

READ THE NLCL :hARACTER FROM THE UFO. 

CHECK IF IT IS A NULL CHARACTER. 

GO REPORT THE ERROR IF NOT THE SAME. 



INC 


ERRNBR 


MOV 


*126. .RO 


JSR 


PC.READBX 


BCC 


50$ 


INC 


ERRNBR 


TST 


Rl 


BNE 


40t 


INC 


ERRNBR 


MOV 


♦EM5402.R1 


MOV 


RBUFA.RS 


MOV 


(R3).R2 


CMPB 


R2.<K>00 


BNE 


40) 


INC 


ERRNBR 


MOV 


(R5).R2 


CMPB 


R2.023 


BNE 


40t 


MOV 


(R5).R2 


INC 


ERRNBR 


CMPB 


R2.d21 


BNE 


40$ 


INC 


ERRNBR 


HOV 


(R3).R2 


CMPB 


R2,0000 


BNE 


40$ 



i ♦ 



READ THE REMAINING CHARACTERS FROM THE FIFO. 



6ii 


MOV 


*61. .RO 




INC 


ERRNBR 




JSR 


PC.READBX 




BCC 


50$ 




INC 


ERRNBR 




TST 


Rl 




BNE 


40$ 




BR 


60$ 


50i : 


MOV 


0EM5402.R1 


40$: 


ERROR 






BR 


f.i 


50$: 


JSR 


F( T^^BRT 


60$: 


CIH 


C'^LCF 



iSET UP READ COUNTER. 

iSET ERROR NUMBER TO 5717. 

iREAD THE FIRST 61 CHARS. 

|G0 REPORT THE ERROR IF FIFO EMPT^ . 

jSET ERROR NUMBER TO 5718. 

(CHECK IF AN XON WAS FOUND. 

I GO REPORT ERROR IF AN XON WAS FOUNO 

jEXiT THE TEST. 

I SET UP THE MESSAGE 

J "FIFO ALARM SIGNAL OtFECTIVF'. 

, i>>^> ERROR <<<<< 

TRAP 
jEXlT IHE TEST, 



C$ERROR 



jREPORT lEST ABORTED. ERROR IND^C^TES FAULT 
t INDICATE ThAT WE ARE NOT WITHIN A TEST. 



ENDTST 



L 10042: 



TRAP 



C$LTST 



I-1 1 4 
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SEQ 1/6 



6850 

6&51 

«>8b3 
6854 
6855 
6856 
685? 
6858 
6859 
6860 
6861 
686^ 
6865 

6864 



6865 
6866 
6867 
6668 
6669 
6870 
6871 
68 72 
6873 
6874 
6875 
6876 
6677 
6678 
66 79 
6880 
6881 



688? 



6885 
6884 
6685 
6886 
6387 
6888 
6889 
6890 
t^9l 
6892 
6895 
6894 
68<JS 



030102 
050102 
030102 
030102 
030106 

030110 
030116 
030124 
030152 
030140 
030146 



030152 
030156 
030160 



030164 
030164 
030170 
030174 
030200 
030204 
030206 
030212 
030212 
030216 
030220 



030224 
030230 
030254 
030240 
030244 
030250 
030254 
030256 



012700 
104441 
000016 
012767 
012767 
012767 
012767 
012767 
005067 



004 767 
105402 
000167 



012 746 
016746 
012746 
104437 
062706 

012700 
104441 
00^067 



004767 
012704 
004 767 
004 767 
005267 
005767 
001002 
000167 



000240 



000016 
177777 
000001 
013251 
006757 
152100 



166124 
000732 



000300 
017702 
152014 
000003 

000010 

000200 

152042 



166224 
000005 
164022 
166150 
155602 
15201? 

000630 



SBTTL HARDWARE TEST - RXTIMER - 

- RXTIMER REG TEST - 
IHIS TEST VERIFIES THAT THE RXTIMER DELAYS ANY RX-INTS BY THE 
REGL€STED AMOUNT ANO THAT WHEN THE RXFTFO IS MORE THAN 3/4 flk± 
THE RXTIMER VALUE IS IGNORED ANO AN INTERRUPT OCCURS IMMEDIATELY. 

DUE TO TKI DIFFERANCES IN LTC HANDLING OF DIFFERENT VERSIO.^^. OF 
THE DRS ANO LTC AVAILABILITY ON DIFFERENT ©OP-ll MACHINES THE 
RX-INT CAN ONLY BE TIMED TO WITHIN ^/- 20f< OF THE RXTIMER VALUE. 

THIS TEST IS PERFORMED IN INTERNAL L00P8ACK ON THE FIRST ACTIVE LlNf. 



BGNTST 

lALLOW l,TC INTERRUPTS, 



T14:: 



152136 
152124 
153716 
153712 
153706 



SETPRI ftPRI05 



TNUM -- TNUM • 1 

MOV •TNUh.TSTNUM 

MOV «-l,CTRLCF 

MOV *l,ERRTYP 

MOV *5801. .ERRN8R 

MOV *EM5801,ERRMSG 

CLR EXOERR 



MOV *PRI05,R0 
TRAP CJSPRI 

I INCREMENT ASSEMBLY TIME TEST COUNTER 

iSET UP THE TEST NUMBER. 

(INDICATE THAT WE ARE IN A TEST. 

(SET ERROR TYPE AS FATAL IN fHROR TABLe . 

iSET THE ERROR NUMBER TO 5801. 

;SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

(CLEAR THE "EXIT ON ERROR" FLAG. 



t RESET THE DEVICE ANO LEAVE THE SELFTEST CODES IN THE FIFO. 

JSR PC.RESETT iRESET THE OUT. 

BCS .*6 (CONTINUE IF FIFO PURGED 

JMP 60$ iREPORT THE RESET FAILURE. 

! SET UP THE INTERRUPT SERVICE ROUTINE THAT DtCTECTS THE RX-INT 

SETVEC RXVECA.^RXDECT.»PR106 



SETPRI 0PRI04 



CLR 



RXINTC 



lALLOW DEVICE INTERRUPTS. 



(CLEAR THE RX-INT COUNT. 



MOV 


dPRI06. ^SP) 


MOV 


^RXOECT. CSP) 


MOV 


RXVECA. tSP) 


MOV 


d5, (SP) 


TRAP 


CISVEC 


ADD 


dlO.SP 


MOV 


OPRI04,RO 


TRAP 


C5SPRI 



I ENABLE RX-INTS AND WAIT FOR ONE TO OCCUR. 

JSR PC.RXIFI lENABLE RX-INTS. 

MOV 05. R4 iSET THE DELAY OF 5 MILLI SECS. 

JSR PC, DEI AY iDELAt WHILE THE INT OCCl-«S . 

JSR PC.RXIEO (DISABLE RX INTS. 

INC ERRNBR iSET THE ERROR NUMBER TO 5802. 

rST RXINTC (TEST IF AN INTERRUPT OCCURED. 

BNE .^6 jCONTINUf IF AN INTERRUPT OCCURFD. 

JMM 50t I REPORT THE ERROR IF NO INTERRLiPT. 
J ♦ 



114 



C7DHVB0 OHU-U ^UNC TST 
HARDWARE TEST 



6896 

6897 

6898 

6899 

6900 

6901 

6902 

6903 

6904 

690S 

6906 

6907 

6908 

6909 

6910 

6911 

6912 

6913 

6914 

6915 

6916 

6917 

6918 

6919 

6920 

6921 

6922 

6923 

6924 

6925 

6926 

692 7 

6928 

6929 

6930 

6931 

6932 

6933 

6934 

6935 

6936 

6937 

6938 

6939 

6940 

6941 

6942 

6943 

6944 

6945 

6946 

694/ 

6948 

^,949 

6950 

6951 

6952 



030262 
030266 
050270 
030274 

030300 
030304 
030310 
030514 
030320 



030524 
030330 
030334 
030342 
030346 
030350 
030354 
030360 
030364 
030370 

030374 
030376 



030402 
030404 
030406 
030410 

030414 
030416 
030420 
030424 
030430 
030434 
030440 
030442 
030446 
030452 
050460 
030466 
030472 



004767 
103402 
000167 
012700 

004767 
012700 
004 76 7 
012704 
004767 



010167 
012705 
012767 
004767 
105402 
000167 
016701 
012703 
005267 
004767 

103402 
000167 



010501 
006301 
006301 
105077 

010500 
005300 
110077 
012704 
004767 
012702 
010203 
012704 
005067 
012767 
016777 
004 767 
103415 
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SEQ 177 



164202 

000622 
000204 

167246 
177670 
167266 
000012 
163736 



000616 
000020 
013253 
165022 

000536 
000566 
000277 
153462 
163726 



000510 



151612 



151604 
000002 
163626 
000001 

002266 
151614 
000100 
151572 
164236 



SET INTERNAL LOOPBACK ON THE FIRST ACTIVE LINE AND ENABLE RECIfcVERS. 
THE LPR'S TO 3a.4l< BAUD. 8 BITS/CHARA, ODD PARITY, 2 STOP BITS. 



SET UP 



JSR 


PC.FINACT 


BCS 


.*6 


JHP 


601 


MOV 


0204 . RO 


JSR 


PC.UTWLNC 


MOV 


0177670, RO 


JSR 


PC.WTULPR 


MOV 


010, .R4 


JSR 


PC. DELAY 



I SET KP THE LOOP TO TEST THE 
I DMA 191 CHARACTERS INTO THE 
; THE INTERRUPT OCCURS WITHIN 



153510 2$i 



MOV Rl,70* 

MOV #16., R5 

MOV 05803. .ERRNBR 

JSR PCPUFIFO 

BCS .t6 

JMP 501 

MOV 701, Rl 

MOV 0191. .R3 

INC ERRNBR 

JSR PC.DMABUF 

BCS .•6 

JMP 501 



i CALCULATE THE TIME-OUT VALUE 
I WAIT FOR THE RX-INT. 
i ■ 



(FIND AN ACTIVE LINE FOR THIS TEST. 

I CONTINUE IF A LINE HAS BEEN FOUND. 

lEXIT THE TEST IF NO LINES ACTIVE. 

iPASS PARAMETER FOR INTERNAL LOOFBACK, 

(ENABLE RECIEVFRS. 

1 INITIALISE THE LINE CONTROL REGS. 

jPASS THE LPR CONTENTS. 

jSET THE LPR'S TO 38. 4K BAUD. 

.PASS DELAY TIME OF 10 MILLI 5EC5. 

tWAIl FOR LNCTPL AND LPR REGS TO BE UPDATED. 

RXTIMER WITH DELAYS OF 15,31,63.127 AND 255 MS. 
FIFO AND THEN ENABLE INTERRUPTS. VERIFY THAT 
♦ /- 20i< OF THE RXTIMER VALUE. 

iSAVE THE LINC NUMBER. 

iSET THE FIRST (RXTIMER VALUE *■ 1), 

iSET THE ERROR NUMBER TO 5803, 

(PURGE THE RXFIFO. 

(CONTINUE IF SUCCESSFUL. 

(REPORT THE ERROR IF FIFO FAILED TO PURGE. 

(PASS THE LINE NUMBER. 

(PASS THE NUMBER OF CHARS TO DMA. 

(SET THE ERROR NUMBER TO 5804. 

(PERFORM THE DMA FROM ADOR 0BUFBA5.THIS SUBR 

[PRODUCES ERRORS >>>>> 5804 THRU 5805 <<<<<, 

(CONTINUE. IF SUCCESSFU . 

(REPORT THE ERROR IF ONE OCCURED. 

FOR THE RX-INT, SET UP THE: RxTIMfcR, AND 



151576 
151540 



MOV 


R5.R1 ( 


ASL 


Rl ( 


ASL 


Rl ( 


CLRB 


SCSRA 1 


MOV 


R5,R0 ( 


DEC 


RO I 


MOVB 


RO.aRXTMA ( 


MOV 


02 , R4 ( 


JSR 


PC. DELAY ( 


MOV 


06IT0.R2 i 


MOV 


R2.R3 1 


MOV 


0RXINTC,R4 ( 


CIR 


RXINTC ( 


MOV 


OflIT06.ItSTAT ( 


MOV 


lESTAT^BCSRA ( 


JSR 


PC.MSLGET ( 


BCS 


4S 1 



COPt THE RXTIMER VALUE . 1. 

MULTIPLY BY 4 TO OBTAIN. 
THE TIME-OUT FOR THE RX-INT. 

CLEAR THE INO. ADOR. REG BIT J OF X^. CSR READY 
FOR THE WRITE TO THE RXTIMER REG. 
COPY THE RXTIMER VALUE ♦!. 
GET THE RXTIMER VALUE 
LOAD THE RXTIMER REG. 
SET DELAY OF 2 MS . 

DELAY TO ALLOW THE RXTIMER VALUE TO UPDATE. 
INDICATE TO TEST BITO. 
INOICATt TO TEST FOR A "1". 
PASS ADOR Of WORD TO TEST. 
CLEAR THE RX INT COL'NT . 
SET THE RXINT-ENBL BIT IN lESTAT. 
ENABLE RX INTS. 
WAIT FOR THE INT TQ OCCv.>R , 
AVOID ERROR REPORT IF THE INTERRUPT OCCURhU . 



030474 010502 



1 * 

( REPORT THE TIMt OUT ERROR. >•»>•■« SM06 <<•*«. 

MOV H5,R2 ;PAS^. THt RxUMLR VALUE TO. 



J 1 4 



CZDHV80 DH'Jll 
HARDWARF. TEST 



6933 
6954 
695S 
6956 
69S7 
6958 



6959 

6960 

6961 

696? 

6965 

6964 

6965 

6966 

6967 

6968 

696 '^ 

6970 

6971 

697;> 

6973 

6974 

6975 

6976 

6977 

6978 

6979 

6980 

6981 

6982 

6983 

6984 

6985 

6906 

6987 

6988 

6989 

6990 

6991 

699? 

6995 

6994 

6995 

6996 

699/ 

6998 

6999 



7000 
7001 



0304 76 
030500 



030504 
030504 
030506 
030510 
030519 

030514 
03052? 
030524 



030526 
030534 
030536 
030540 
000544 
030550 
030552 



rUNC TST 



005302 
012V01 



104455 
013256 
006757 
012U2 

032767 
001575 
000454 



012767 
010502 
005302 
004767 
005767 
001162 
004767 



030556 
030562 
030566 
030572 

030576 
030600 
030604 
030610 
030614 
03C620 
030624 



050626 
030630 
030632 



030636 
030636 
030640 
030642 
030644 



016701 
012703 
005267 
004767 

103145 
005067 
012701 
012702 
004767 
004 767 
103414 



010502 
005302 
012701 



104455 
013262 
006757 



PART2 MACRO 
- RXTIMBR - 
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SEQ 170 



DEC R2 

MOV ftEM5805,Rl 



(THE ERROR REPORTING KOUTINE. 

I PASS THE MESSAGE, 

1 "RXTIMER BAD, TIME-OJT OCCURED WAITING FOR 

1 THE RX-INT". 



ERRDF 5806.EM5601.ER5801 (REPORT ERROR 5'j06. 



TRAP 


CJERDf- 


.WORD 


5806 


.WORD 


EM5801 


.WORD 


FR5801 



OOOIOO 151466 



BIT *eiT06. OPTION 
BEQ 60$ 
BR 6$ 



jHAS EXTENDED ERROR REPORTING BEEN REQUESTED V 

lEXIT THE TEST IF IT HASN'T. 

I BRANCH TO TEST ANOTHER RXTIMER VALUE. 



CHECK THAT THE INTERRUPT OCCURED WITHIN ♦/- 20i< 
THIS SUBROUTINE REPORTS ERROR >>>>> 5807 <*<<<, 



OF THE RXTIMER VALUE 



013257 153316 4$: 



163302 
151502 



165636 



000564 
000001 
153260 
163524 



151462 
000005 
002266 
165634 
166612 



MOV #5807. .ERRNBR 

MOV R5.R2 

DEC R2 

JSR PC.CKRXTM 

TST EXOERR 

6NE 60$ 

JSR PC.RXIEO 



I SET THE ERROR NUf^ER TO 5807. 

iPASS THE RXTIMER VALUE TO. 

I THE "CHECK TIME" SUBR . 

(CHECK THE TIME TAKEN AND REPORT ANY ERROR 

J TEST THE "EXIT ON ERROR" FLAG. 

jEXIT IF SET. 

;DISABLE RX-INTS. 



; DMA ANOTHER CHARACTER TO FILL THE FIFO TO THE 75* LEVEL, AND CHECK THAT THE 
I RX-INT OCCURS IMMEDIATELY. 

iPASS THE LINE N*JMBEH. 

iPASS THC NUMBER OF CHARS TO DMA. 

(SET THE ERROR NUMBER TO 5808. 

I PERFORM THE DMA FROM ADOR 06UFBAS.THIS SUBR 

jPRODUCEl. errors >>>>> 5808 THRU 5809 <<<<<. 

i REPORT THE ERROR IF ONE OCCURED. 

1 CLEAR THE RX-INT COUNT. 

iSET THE TIME-OUT TO 5 MS. 

(PASS ADDR OF WORD TO TEST. 

(ENABLE INTERRUPTS. 

jWAIT FOR THE INT TO OCCUR. 

(AVOID THE ERROR tF AN INTERRUPT OCCURED. 



I - 



007077 



MOV 


701. Rl 


MOV 


*1.R5 


INC 


ERRNBR 


JSR 


PC.OMABUF 


BCC 


50$ 


CLR 


RXINTC 


MOV 


05. Rl 


MOV 


0RXINTC,R2 


JSR 


PCRXIEI 


JSR 


PC.WAIBIS 


BCS 


6i 


THE 


ERROR, RX-INT 


MOV 


'.5.R? 


DEC 


i^? 


MOV 


»EM5803.R1 



NOT OCCUR IMMEDIATIEY.:»>^>> 5810 <<<<< 



(PASS THE RXTIMER VALUE. 

(PASS THE MESSAGE. 

I "RXTIMER BAD. RX-INT DTD 

1 IMMEDIATELY WHEN RXFIFO 



ERRDK 5810,EM58Ol.ER5fl0l ( REPORT ERROR 5810. 



NOT OCCUR 
3/4 FULL" 



TRAP 
.WORD 

.WORD 
.WORD 



CJtROr 
5810 

EM5801 
fRS80l 



050646 032767 000100 151534 



BIT 



<>B I T06, OPTION (HAb EXTENDED ERROR REPORTING 3EEN REUUESTEO 7 



K14 



CZDHVBO DHU 11 
HARDWrtRt: TF5T 



FUNC TST PART? MACRO M1200 
- RXTIMER - 



15-MAR-84 09:28 PAGE 118-3 



SEQ 179 



7002 
7003 
7004 
7005 
7006 
7007 
7006 
7009 
7010 
7011 
7012 
7013 
7014 
7015 
7016 
7017 
7018 
7019 
7020 
7021 
7022 
7023 
7024 
7025 
7026 
7027 
7028 
7029 
7030 
7031 
7032 
7033 
7034 
703b 
70J6 
7057 

7o:?8 

7059 
7040 
7041 
7042 



7043 
7044 
7045 
7046 
7047 
7048 
7049 
7050 
7051 
7052 
7053 
7054 



030654 001520 



030656 
030662 
030664 
030670 



050672 
030700 
030704 
030706 
030712 
030716 
030722 

030726 
030730 
030734 
030740 
030744 

030750 
030754 
030760 
050764 
030770 
030774 



031002 
031002 
031004 
051006 
031010 



004767 
006305 
020527 
003621 



012767 
OOAfh.7 
103102 
016701 
012703 
005267 
004767 

103071 
012701 
012702 
005067 
105077 

105077 
012704 
004767 
004767 
004 76 7 
103007 



165532 
000400 



013263 
164464 

000234 
000277 
153130 
163374 



001750 
002266 
151322 
151256 

151254 
000002 
163276 
165464 
166442 



030776 012701 007201 



104455 
013266 
006757 
011762 



031012 000441 



051014 
031020 
031026 

051032 
051036 



004 767 
012767 
016701 
012703 
004767 



165374 
013267 
000114 
OOOOOl 
163260 



BEQ 



60S 



lEXIT THE TEST IF IT HASN'T. 



SELECT ANOTHER VALUE FOR THE RXTIMER OR IF ALL VALUES HAVE BEEN TESTED THEN 
TEST THE RXTIMER WITH INDEFINATE DELAY SET. 



6$: 



JSR 


PC.RXIEO 


ASL 


R5 


CMP 


R5,*256. 


8LE 


21 



(DISABLE INTERRUPTS. 
iMULTIPLY CRXTIMER VALUE » 1) BY 2. 
iHAVE ALL VALUES BEEN TESTED ? 
(BRANCH AND TEST ANOTHER VALUE IF NOT 



153152 



t VERIFY THAT WHEN RXTIMER VALUE IS THE INTERRUPT IS DELAYED INDEFINITELY, 
: UNLESS THE RXFIFO IS 75^ FULL OR MORE. 

SET THE ERROR NUMBER TO 5811. 

PURGE THE RXFIFO. 

REPORT THE ERROR IF THE FIFO FAILED TO PURUE. 

PASS THE LINE NUMBER. 

PASS THE NUMBER OF CHARS TO DMA. 

SET THE ERROR NUMBER TO 5812. 

PERFORM THE DMA FROM AOOR KrtJUTBAS.THlS SUBR 

PRODUCES ERRORS >>>>> 5812 THRU 5813 <<<<<. 

REPORT THE ERROR IF ONE OCCURED. 

INDICATE TO TEST BITO WITH TIME OUT OF 1 SEC. 

PASS THE ADOR OF THE WORD TO TEST. 

CLEAR THE RX-INT COUNT. 

CLEAR THE INO. AOOR. REG BITS OF THE CSR READY. 

FOR THE WRITE TO THE RXTIMEh REG. 

SET THE VALUE IN THE RXTIMER. 

SET THE DELAY OF 2 MS . 

DELAY TO ALLOW THE RXTIMER VALUE TO UPDATE. 

ENABLE RX-INTS. 

WAIT FOR THE INTERRUPT TO OCCUR. 

AVOID THE ERROR IF NO INTERRUPT. 



I - 



HOV 


05811. .ERRNBR i 


JSR 


PC.PUFIFO J 


BCC 


50$ 1 


MOV 


70$. Rl i 


MOV 


*191.,R3 1 


INC 


ERRNBR 1 


JSR 


PC.DMABUF 1 


BCC 


50$ 1 


MOV 


01750. Rl I 


MOV 


0RXINTC.R2 J 


CLR 


RXINTC I 


CLRB 


aCSRA I 


CLRB 


ORXTMA I 


MOV 


02. R4 1 


JSR 


PC. DELAY I 


JSR 


PC.RXIEI I 


JSR 


PC.WAIBIS I 


BCC 


8$ I 


THE ERROR, RX-INT OCCURE 


MOV 


0EM5804,R1 j 



PASS THE MESSAGE, 
"RXTIMER BAD. RX-INT OCCURED WITH RXTIMER 
VALUt ZERO". 



ERRDF 58l4,EM5a01.ER0503 j REPORT ERROR 5814. 



TRAP 


C$tRDF 


.WORD 


5814 


.WORD 


EM5801 


.WORD 


ER0503 



BR 



60$ 



jEXIT THE TEST. 



VERIFY THAT WHEN THE FIFO IS 75* FULL THE INTERRUPT OCURS IMMEDIATELY. 



153024 



8$; 



JSR 


PC.RXIEO 


HOV 


05815. .ERRNBR 


MOV 


70$, Rl 


MOV 


01, R3 


JSR 


PC.DMABUF 



031042 103023 



BCC 



50$ 



I DISABLE RX INTS. 

iSET THE ERROR NUMBER TO 5815. 

(PASS THE LINE NUMBER. 

(PASS THE NLiMBER OF CHARS TO DMA. 

; PERFORM THE DMA FROM ADDR 06L»BAS.THIS tA'HR 

jPRODUCES ERRORS >>»>• 5815 THRU 581b <<<<<. 

i REPORT THE ERROR IF ONE OCCURED. 



L14 



CZDHVBO DHU 11 KUNC TST PART^ MACRO M1200 15-MAR-84 09:28 PAGE 118-4 
HARDWARt; TEST - RXTXMER - 



SEQ 180 



7055 
7056 

7057 
7058 
7059 
7060 
7061 
7068 
7065 
7064 
7065 
7066 
7067 



7068 
7069 
7070 
7071 
7072 



7073 
/074 



7075 
7076 



707/ 
7078 



031044 
031050 
031054 
031060 
031064 
031070 



031072 
031074 

031100 
031100 
031102 
031104 
031106 

031110 

031112 
031116 
031116 
031122 
031124 
031130 
031130 
031134 
031136 
03UA2 
031142 
031144 
031146 
031150 
031150 
031150 



005067 
012701 
012702 
004767 
004767 
103412 



005002 
012701 



104455 
013271 
006757 
012112 

000402 

004767 

012700 
104441 
004767 

016700 
104436 
005067 

1044 32 
000004 
000000 

104401 



151216 
000005 
002266 
165370 
166346 



CL.R RXINTC 

MOV 05, Rl 

MOV *RXINTC,R2 

JSR PC.RXif.l 

JSR PC.WAIBIS 

BCS 60$ 



jCLEAR THE RX-INT COUNT, 

I SET THE TIME-OUT TO 5 MS. 

[PASS AODR OF UORD TO TEST. 

(ENABLE INTERRUPTS. 

jWAIT KOR THE INT TO OCCUR. 

(EXIT THE TEST IF AN INTERRUPT OCCUREO. 



1 ♦ 



REPORT THE ERROR, RX-INT DID NOT OCCUR IMMEDIATLEY . >>> >> 5817 <<<<< 



007077 



CLR R2 

MOV 0EM5803.R1 



(PASS THE RXTIMER VALUE. 
J PASS THE MESSAGE. 



ERRDF 5ei7,EM5801,ER5801 i REPORT ERROR 5817. 



TRAP 
.WORD 
.JORD 
.WORD 



C$t ROF 

581 / 
EMS801 

ERbeoi 



BR 



60$ 



1655:4 
000340 
165264 
151060 
151106 



50$: 
60$: 


JSR 
SETPRI 


PC.TSABRT 
0PRI07 




JSR 
CLRVEC 


PC.RXIEO 
RXVECA 




CLR CTRLCF 
EXIT TST 


70$: 


.WORD 
ENOTST 






(EXIT THE TEST. 

(REPORT NON-^RELATEO TEST ERROR. 
(DISABLE ALL INTERRUPTS. 



MOV 
TRAP 



dPRI07,RO 
C$SPRI 



(DISABLE DEVICE RX-INTS. 

(CLEAR DOWN THE RX VECTOR. 

MOV 
TRAP 

(INDICATE THAT WE ARE NOT WITHIN A TEST. 



RXVECA, RO 

CiCVEC 



TRA2 C$t:xtT 
.WORD L 10043 -. 
(LOCAL STORAGE FOR LINE NUMBER USED IN THE TEST. 



L 1004 3: 



TRAP 



C$ETST 



M14 



CZDHVBO DHU-11 FU^4C TST PART2 MACRO ML200 
HARDWARE TEST - TXACTF - 



15-MAR-84 09:28 PAGE 119 



SEQ 161 



7030 

"nai 

T08? 
^085 
708-1 
708b 
7086 
708 7 
7088 
7089 
7090 
7091 
709P 
7093 
70*^4 

70^^ 
709f 



7097 
7098 
7099 

7100 
7101 
710? 
7101 
7104 
710"> 
7106 
7107 
7108 
7109 
7110 
7111 
711? 
7113 
7114 
711") 
7116 
711/ 
7118 
7119 
7120 
7121 
7U^2 
7125 
7124 
712S 
7126 
7127 
7128 
7129 
7130 
7131 
VI 32 
7133 



0311S2 
031152 

031152 
031152 
031156 



031160 
051166 
051174 
031202 
031210 
031216 



031224 
031230 
031232 



031236 
031242 

051246 
031252 
031256 
031262 
031266 



031272 
0312 74 
031 30U 



012700 
104441 

000017 
012767 
012767 
012767 
012767 
012767 
012767 



004 767 
103402 
000167 



012705 
012700 

004 767 
012700 

00^767 
012704 
004767 



005001 
C12702 
012703 



000240 



000017 
177777 
000001 
013415 
007346 
012170 



162766 
000474 



177777 
00020 

166300 
177670 
166320 
000012 
162770 



151066 
151054 
152646 
152642 
3 52636 
152632 



.ne 
i ♦■* 

;♦ 
I* 

; * 

t* 

I* 
J* 

t* 
!* 

:♦ 
:* 



TIL HARDWARE TEST - TXACTF - 

- TX ACTION FirO TEST - 

THIS TEST VERIFIES THAT THE OUT'S TX-ACTION FIFO CAN CORRECTLY 
HOLD 16 TX-ACTIONS. ONE CHARACTER IS TRANSMUTED ON EACH LINE 
USING DMA, THE TX-ACTIONS ARE THEN READ FROM THE FIFO, VERIFING 
THAT THEY ARE IN THE CORRECT ORDER AND THAT THERE ARE 16 OF THEM. 
THE TEST ALSO VERIFIES THAT THE DUT WILL NOT SEND TX-INTS AFTER 
THE TX.ACTION FIFO HAS BEEN EMPTIED. 
THIS TEST IS PERFORMED IN INTERNAL LOOPBACK ON ALL LINES. 



- - **********4.***4t**********************«*************«*** ******************** 



BGNTST 



SETPRI ^PRI05 



T15:; 



i ALLOW LTC INTERRUPTS. 



MOV 
TRAP 



^PRIOS.RO 
C$SPRI 



i INCREMENT ASSEMBLY TIME TEST COUNTER 

tSET UP Tl-C TEST NUMBER. 

I INDICATE THAT WE ARE IN A TEST. 

(SET ERRCf; TYPE AS FATAL IN ERROR TABLE. 

;SET THE E:RR0R NUMBER TO 5901. 

iSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

I SET THE ERROR REPORTING ROUTINE. 



i RESET THE DUT TO A KNOWN STATE. REMOVE ANY STATUS CODES IN THE FIFO. 

; CLEAR THE RX AND TX ENABLE BITS IN THE CSR. 

J THIS SUBROUTINE REPORTS ERROR >^^^'> 5901 <^<<<. 



TNUM 


■- TNUM ♦ 1 


MOV 


#TNUM. STNUM 


MOV 


^^-l.CTRLCF 


nov 


*i,e;s YP 


MOV 


*5901. ,ERRNBR 


MOV 


0€M5901,ERRMSG 


MOV 


#ER5901,tRRBLK 



JSR 


PC.CLNRST 


BCG 


. *6 


JMP 


60$ 



;RESET THII rnj U REPORT AN1 ERROt^S FOUND. 
•SKIP EXIT TEST IF NO FATAL ERROR FOUND 
;EXIT THE ThSl IF FATAL ERROR FOUND. 



[ ♦ 



SET INTERNAL LOOPBACK ALL LINES AND ENABLE RKCIuVERS. SET UP THE 
LPR'S TO 38. 4K BAUD. 8 HTS/CHARA. ODD PARITY. 2 STOP BITS. 



1- 



MOV *MAPLNS.R5 

MOV <>204,R0 

JSR HC.UTWLNC 

MOV *>17.o70.RO 

JSR PC.UTWIPR 

HC,' 010. .R4 

j;f! PC, DEL AY 



ALL LINES. 
INTERNAL LOOPBACK. 



(INDICATE TO SET UP 

jPASS PARAMETER FOR 

I ENABLE RI-CIEVERS. 

(INITIALISE THE LINE CONTROL REGS, 

iPASS THE LPR CONTENTS. 

;SET THE LPR'S TO 36. 4K BAUD. 

I PASS DELAY TIME OF 10 MILL I SECS. 

tWAIT FOR LNCTRL AND LPR REGS TO BE 



UPDATED 



002650 
000001 



[ jlNITIATF A DMA ON EACH LINE AND WAIT FOR ALL DMA' S TO COMPLEATE 

O R Rl jPASS TH'E 

MOV 0BUFBAS.R2 jPASS THE 
MOV <?1.R3 jPASS THE 



FIRST LINE NUMBER. 

START OF THE DATA PATTERN TO 

LENGTH OF THE DATA PATTERN. 



T\ 



N14 



CZDHVBO DhU-11 FUNC TST 
HARDUrtRE TFST 



71.34 03150- 


012704 


000005 


7135 03131'J 


005267 


152536 


7136 031314 


004767 


163060 


7157 03132C 


103402 




7138 0313?? 


000167 


000400 


7139 






7140 






7141 






7142 031326 


004767 


162730 


7143 031332 


005201 




7144 031334 


022701 


000020 


7145 031340 


001365 




7146 






714/ 






7148 






7149 






7150 031342 


0052f 7 


152504 


7151 031346 


012703 


007402 


7152 






7153 031352 


005001 




7154 031354 


017702 


150646 


7155 031360 


100150 




71-^.6 031362 


000302 




7157 031364 


042702 


177760 


7158 031370 


020201 




7159 






7160 031372 


001405 




7161 031374 






031374 


104460 




7162 051376 


052767 


000100 


7163 031404 


001552 




7164 031406 


005201 




7165 031410 


022701 


000020 


7166 031414 


001357 




7167 






7168 






7169 






7170 






7W1 






7172 






71/3 031416 


00b nr 


150604 


7174 031422 


100024 




7175 






7176 031424 


012767 


013421 


7177 031432 


012702 


000021 


7178 031436 


005777 


150564 


7179 031442 


100123 




7180 






7181 031444 


005202 




7182 031446 


022702 


000145 


7183 031452 


001371 




7184 






7185 






7186 






7187 






7188 031454 


00526 7 


152372 


7109 031460 


012701 


0075/0 



PART2 MACRO M1200 
- TXACTF - 



2$: 
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SEQ 182 



MOV 
INC 

JSR 

BCS 

JMP 



«5.R4 
ERRNBR 
PC.DODMA 
. *6 
50$ 



jPASS THE DELAY TIME OF 5 MILLI SECS. 

(SET THE ERROR NO-'IBER TO 5902. 

(TRANSMIT THE DATA PATTERN. 

[CONTINUE IF SUCCESSFUL. 

i ABORT THE TEST IF ERROR FOUND DURING DMA TX 



WAIT FOR THE DMA TO COMPLEATE BEFORE INITIATING ANOTHER, 



JSR 
INC 
CMP 

BNE 



PC. DELAY 
Rl 

<>16. .Rl 
2$ 



(UAIT 5 MILLI SECS FOR THE DMA TO COMPLEATE 
(INCREMENT THE LINE NUMBER. 
(BRANCH TO INITIATE ANOTHER DMA IF 
(NOT ALL LINES SERVED. 



READ THE TX ACTIONS FROM THE TX ACTION FIFO AND VERIFY THAT THEY OCCURED 
IN THE CORRECT ORDER. 



4$ 



150604 



6$ 



INC 


ERRNBR 


MOV 


*EM5902.R3 


CLR 


rii 


MOV 


0CSRA,R2 


BPL 


14$ 


SUAB 


R2 


BIC 


017/760. R2 


CMP 


R2.R1 


BFQ 


6$ 


ERROR 




BIT 


^IT06. OPTION 


BEQ 


60 J 


INC 


Rl 


CMP 


«16. ,R1 


BNE 


4$ 



(SET THE ERROR N^JMBER TO 5903. 
(SET THE ERROR MESSKGE TO. 

I "tx-act::on recieveo from the 

(CLEAR THE LINE NUMBER. 
(READ THE CSR. 
I BRANCH TO REPORT ERROR 
(PUT THE "X LINE NUMBER 
(CLEAR THE CLUTTER FROM 
[COMPARE THE ACTUAL LINE 



WRONG LINE 



>>5904'f<. IF NO TX-ACT. 
IN THE LOW BYTE. 
THE LINE NUMBER. 
NUMBER OF THE 



[TX-ACTION WITH THE EXPECTED NUMBER. 
[SKIP THE ERROR REPORT IF CORRECT. 
J REPORT THE ERROR >>>>> 5903 <<<<<. 

TRAP 
(EXIT IF EXTENDED ERROR REPORTING HAS 
(BEEN REQUESTED. 

[ INCREMENT THE EXPECTED LINE NUMBER. 
{BRANCH AND READ ANOTHER TX -ACTION IF 
(NOT ALL LINES HAVE Bi-EN SERVICED. 



C$ERR0R 
NOT 



16 TX-ACTIONS HAVE BEEN READ, THE TX-AC"ION BIT SHOULD NOW BE CLEAR. 
CHECK THAT IT IS CLEAR. IF IT ISN'T THEN COUNT THE NUMBER OF EXTRA 
TX-ACTIONS RECIEVED AND REPORT THE ERROM. 



152420 



8$ 



TST SCSRA 

BPL 10$ 

MOV «5905. .ERRNBR 

MOV ^17.. R2 

TST SCSRA 

BPL 16$ 

INC R2 

CMP 0101. .R2 

BNE 8$ 



5905. 

OF TX 



ACTIONS rOUNO 



;READ THE CSR. 

(BRANCH IF THE TX ACTION BIT IS CLEAR, TO 

(TEST THE TX-INTERRUPTS. 

(SET THE ERROR NUMBER TO 

(SET R2 TO BE THE NUMBER 

(READ THE CSR. 

(BRANCH AMD REPORT ERROR IF THE TX-ACTION FIFO, 

(FINALLY CLEARED, 

(INCREMENT THE Nl»MBER OF 

(IF LESS THAN 100 TX ACTIONS HAVE BEEN READ. 

[THEN CONTINUE READING THE CSR. 

[OTHERWISE REPORT THE ERROR. 



TX-ACTIONS FOUND 



[ REPORT THE ERROR "TX -ACTION FIFO WOULD NOT EMPTY 



INC ERRNBR 
MOV flEM5904.Rl 



[SET THE E"^ROR NUMBER TO 5906 
(SET THE ERROR MESSAGE TO, 



Bl 



C/OHVHO DHll 11 


FUNC TST 


PART 2 MACRO 


HARDWARt TtST 




. TXACTF 


71^0 






7191 031464 


012/6; 


on 762 15256 


719^ 03147? 


000513 




71^5 






71<»4 






719S 






7196 






7197 






71*^8 0314 r4 


005001 




7199 






7^>00 






7.^01 






7202 






7?05 0514 ?6 


01276/ 


015425 15234 


7204 051504 


012702 


002650 


7^05 051510 


012705 


000001 


74?06 051514 


004767 


162660 


7^07 0515^0 


105102 




7^06 051522 


005201 




7^09 051524 


022701 


000020 


7210 0"1550 


001371 




7211 051552 


012704 


000144 


7212 031556 


004767 


162520 


7213 






7214 






/215 






7216 






721 : 






7218 0M542 


00506 7 


150524 


7:>19 031546 


005067 


150522 


7220 






7221 051552 






051552 


012746 


000 500 


051556 


012746 


017734 


051562 


016746 


15O4 50 


051566 


012746 


000005 


051572 


104457 




051574 


062706 


ooooio 


7222 051600 






051600 


012700 


000200 


051604 


104441 




f^J5 051606 


004767 


165444 


7224 






7225 






7226 






7227 051612 


012704 


0OO005 


7226 031616 


004767 


16244U 


/229 






7250 






7231 






7232 0n622 






051622 


012700 


000^40 


031626 


104441 




V.'55 051630 


004/6 7 


16'>3f.2 


7254 051654 






031654 


016 '00 


I505li6 


051040 


104436 
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ShQ 183 



MOV OCR0503.ERRBLK 
BR lot 



i "TX ACTION FIFO WOULD NOT fMPTr" 
iSET UP THE ERROR REPORTING ROUTINE. 
iGO REPORT THE ERROR. 



I NOW VERIFY THAT NO TX INTS OCCUR AFTER THE TX. ACTION FIFO HAS BEEN EMPTIED. 
I OF TX^ACTIONS. I.E, NO INj'ERRUPTS OCCUR WITH THE TX. ACTION BIT CLEAR. 



101; 



CLR 



Rl 



jPASS THE NUMBER OF THE FIRST LINE 



I INITIATE A DMA ON ALL LINES AND WAIT FOR ALL DMA' 5 TO COMPLETE. 



I 



12»i 



MOV 


♦590 7, .ERRr«R 


MOV 


♦eurBAS.R2 


MOV 


♦ I.R5 


JSR 


PC.OODMA 


BCC 


501 


INC 


Rl 


CMP 


•16. .Rl 


BNE 


121 


MOV 


♦100.. R4 


JSR 


PC, DELAY 



(SET THE ERROR NUMBER TO 5907. 

iPASS THE START OF THE DMA PATTERN TO TX. 

iPASS THE LENGTH OP THE DATA PATTERN, 

(TRANSMIT THE DATA PATTERNS. 

lABORT THE TEST IF ERROR FOUND DUPING DMA TX. 

lINCREMENT THE LINE NUMBER. 

iBRANCH TO INITIATE ANOTHER DMA IF, 

lALL LINES NOT SERVED, 

(SET THE DELAY OF 100 MILL! SECS. 

»WAIT FOR THE DMA'S TO COMPLETE. 



I • 



I SET UP THE INTERRUPT SERVICE ROUTINE THAT WILL READ THE TX ACTION FlfQ 
I UNTIL EMPTY AND CHECK FOR ANY SUBSEQUENT INTERRUPTS WITH NO TX ACTION, 
i ENABLE TX INTERRUPTS. 



ClR 

CLR 



TXINTC 
TXINTF 



iCLEAR THE TX INT COUNieR. 
, CLEAR T^^ TX INT FLAGS. 



bETVEC TXVECA.OTXAINT,OPRI06 



5ETPRI ♦PRI04 



lALlOW DEVICE INTtRRuPTS. 



MOV 

MOV 

HOV 

MOV 

TRAP 

ADD 

MOV 
TRAP 



JSR 



pc.Txin 



if-NABl.t TX INTERRLJPTS. 



♦PRI06. (SP) 
• TXAINT, C^>PJ 
TxVFCm. ^SP^ 
*5. (SP> 
CISVtC 
♦10. SP 

♦PRIO4,R0 
CJSPRI 



I WAIT FOR THE iNTtRRUPTS TO OCCUR 



MOV 
JSR 



♦ 5.M4 
PC.DtLAi 



I SET TMt OELAr FOR 5 Mil i I *UCs 
iDELAi FOR 5 MS. 



l*OX*>AaLf INTERRUPTS AND CLEAR DOW^i TmE INTERRUPT SERVICE ROUTINE. 

SF TPRI OPRIO; iDISABl t Al I INTERRUPTS. 

HOV 
TRAP 
JSR PC. TxILO lOf.ABLf OUT tx INTfRRlPfS 

CLRVtC TXVtCA iCLtAR THE TX IHI VtCTOR 

MOV 
THAt> 



»p^:o \Mo 






C70HVH0 OHvi U 
HARDWrtRt TtST 



FUNC TST 



PART»^ MACRO 
■ rXACTF- 



C 1 T; 

Hl.?00 15-MAR 64 0<^;^8 PAGE U9^3 



SEQ 164 



7^7•s 

7r5b 

7^58 

7240 
7241 
7242 
7245 
;244 
7245 
7246 
724 7 
724fl 
7249 
7250 
7251 
7252 
7255 
7254 
7255 
7256 
7257 
7258 
7259 
7260 
7261 

7262 
7265 
7264 
7265 
7266 
7267 



05164? 
031646 
051652 
051654 
051660 
051664 



051672 
051700 



051704 
051712 
051716 

051722 
051722 
051724 

051726 
051752 

051756 
051 ?36 
051736 



005267 
005767 
001425 
005267 
00576/ 
100022 



01^767 
0004X0 



051702 010102 



012767 
012701 
012705 



104460 
000402 

004 767 
005067 



10440X 



152204 
150420 

152172 
150410 



051666 012701 007654 



01X762 152156 



015420 
000020 
007476 



164 740 
1505X2 



X52140 



i VtRUi THAT A TX INTERRUPT OCCURED, AND THAT NO TX INTERRlJPT OCCURtU WHEN 
J THE TX. ACTION FIFO WAS EMPTY. 



I ' 



i * 



ERROR 



X4«: 
16t: 

xeii 

50* : 
60$: 



INC 
TST 

BEQ 
INC 
TST 

BPL 


ERRNBR 

TXINTC 

501 

ERRNBR 

TXINTF 

601 


MOV 


0EM5905 


MOV 
BR 


*€R0503 
X8I 


REPORTING. 



.Rl 



.ERRBLK 



MOV 

MOV 
MOV 
MOV 

ERROR 

BR 

JSfl 
CLH 

ENOTST 



R1,R2 

*5904. ,FPRN8R 
♦16. ,R1 
0EH5903.R3 



60t 

PC.TSABRT 
CTRLCF 



(SET THE ERROR NUMBER TO 5908. 

I RE AD THE INTERRUPT COUNT, 

iBRANCH TO REPORT ERROR IF NO INTS OCCURt:D 

(SET THE ERROR NUMBER TO 5909. 

iREAO THE TX INTERRUPT FLAGS. 

IFXIT WITH SUCCESS IF NO INTERRUPT OCCURED 

lUlTHOUT A CORRESPONOING TX ACTION. 

I SET UP THE ERROR MF.SSAGE . 

I "TX INT OCCURED AFTER TX FIFO HAD 

I BEEN EMPTIED". 

J SET THE ERROR ROUTINE IN THE ERROR TABLE, 

jGO AND REPORT THE ERROR, 



(PASS THE ACTUAL NUMBER OF TX ACTIONS RFCIEVtD, 

I TO THE ERROR ROUTINE. 

(SET THE ERROR NUMBER TO 5904. 

iPASS THE EXPECTED NUMBER OF TX-ACTIONS. 

iSET THE ERROR MESSAGE TO, 

I "INCORRECT NUMBER OF TX-ACTIONS FOUND". 

(REPORT THE ERROR. 

TRAP CiERROR 

lEXlT THE TEST. 



iREPORT NON RELATED TEST ERROR. 
lINOICATE THAT WE ARE NOT WITHIN A TEST 



L 10044! 



TRAP 



C*fcTST 



Dl 



^ 
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lat 



7064 

::: 70 
;."' n' 

;.■• .'s 

7 J 76 

7^ ? 7 

70 7^ 
7PflO 
7031 
72P? 

roB5 

7'eSA 



7085 
7286 

;28 7 
7288 
7089 
7090 

7091 
7090 

7095 
7094 
7095 
7096 
709 7 
7098 
7099 
7 500 
7 501 
7500 
7 505 
750A 
7 505 
7?Wj 
7507 
7508 
7 509 
7510 
7511 
7510 
7515 
;514 
7515 
7516 
751/ 
751H 
7 51*^ 
7 ^00 
7 5.-' I 
7Sci^ 



SdTTL HARDWARE TEST 



TXFIFO 



051/40 
051740 

051740 
051740 
051744 

051746 
051754 
051760 
051770 
051776 
050004 
052010 
050014 
032020 



050004 
050050 
032032 



052056 
050040 
050046 
030052 

052056 
050O6? 
050O66 

0500/2 
052076 



012700 
104441 
000020 
012767 
012767 
010767 
012767 
012767 
005067 
005067 
012700 
004767 



000040 



000020 
177777 
000001 
013561 
007754 
150602 
150056 
002614 
162214 



0047t>7 160166 

10.400 

000167 000722 



010705 
004 767 
016705 
O107OO 

004 76/ 
OlO/OO 
004 76 7 
010/04 
004 767 



177 77/ 
164 760 
150146 
000004 

1654 /O 
I /76 70 
165510 
OOOOIO 
162160 



- TXriFO TEST - 
THIS TEST IS U.^ED TO VERirY THAT THE DUT'O TRANSMIT FIFO'S CAN HOLD 
64 CHARACTERS AND THAT ONLY ONE TX INTERRUPT OCCURS FOR ALL 64 
CHARACTERS. THE TEST ALSO EXERSISES THE BYTE SWAPPER BY USING 
ALTERNATE WORD AND BYTE WRITES TO THE Tx KIFO. AS WELL AS CHECKING THAT 
IHE FIF05JZE REGISTER REPORTS THE NUMBER OF CHARACTERS IN THE FIFO 
CORRECTLY. ANY BMP CODES FOUfJO ARE SAVED ON THE QUE TO BE RFPORTFD 
LATER. 
THE TEST IS PERFORMED IN INTERNAL I OOPBACK ON All ACTIVE LINES. 



150500 
150266 
152060 
152054 
152050 



BGNTST 



SETPRI 0PRI05 



TNUM -» TNUM ♦ 1 

MOV ♦TNUM.TSTNUM 

MOV •-l.CTRLCF 

MOV ♦l.ERRTYP 

MOV ♦600l..ERRNeR 

MOV ♦EMfcOOl , ERRHSG 

CLR ERSMRF 

CLR EXOERR 

MOV ^RCNTB.RO 

JSR PC.CLR16W 



T16j 



jALLOW LTC INTERRUPTS. 



(INCREMENT ASSEMBLY TIME 
iSET UP THE TEST NUMBER. 
I INDICATE THAT WE ARE IN 
I SET ERROR TYPE AS FATAL 
I SET THE ERROP NUMBER TO 
(SET ERROR 
iCLEAR THE 



TEST 



MOV 
TRAP 
COUNTER 



*PRIOS,RO 
CJSPRI 



A TEST. 

IN ERROR TABl E . 

6001. 
MESSAGE A0DPE55 IN ERROR TABlfc 
ERROR SUMMARY FLAGS. 



iCLEAfi THE "EXIT ON ERROR" FLAG. 
(SET UP THE START ADDRESS FOR THE 
iCLEAR THE BLOCK OF 16 WORDS. 



BLOCK 



RESET THE OUT TO A KNOWN STATE. REMOVE ANY 
CLEAR THE RX AND TX ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >>>>* 6001 <<*<< 



STATUS COOES IN THE FIFO. 



JSR 


PCCLNRST 


BCS 


. ^6 


JMP 


601 



iRESET THE DMU-ll REPORT ANt ERRORS FOUND. 
iSKIP fXlT OF TEST IF NO FATAL ERROR FOUND. 
itXIT THE TEST IF FATAL ERROR FOUND. 



SET INTERNAL LOOPBACK ON Al L. ACTIVE I INES AND ENABLE RECILVERS. SET 
LPRS TO 58. 4K BAUD. 8 BUS/CHARA. OOD PARITY. 2 STOP BITS. DISABLE 
TRANSMITTERS ON ALL LINES. 



UP THE 



I INDICATE TO DISABLE AIL LINES. 

iDISABLE TX ON ALL LINES. 

jINDlCATE TO SET UP ACTIVE LINES ONL t . 

(PASS PARAMETER FOR INTERNAL LOOPBACK. 

lENABLE RELIEVERS, 

I INITIALISE THE LINE CONTRCK REGS. 

(PASS THE LPR CONTENTS. 

I SET THE LPR'S TO 5fl.4K BAUO. 

iPAbb DELAt Tim. Of 10 HULI StCb. 

iWAIT FOR LNCTRL AND LPR HfGS TO Ht i.^^O'^M 

St T UP THE TX INTERRUPT SfRVlCt ROUUNt ANC VKTUR. THf ROUTINE CO*-.*^^^- 
THE NiJMBffl Of INTERRUPTS AND CHFCKS FOR ANY INTERRLPTS OCCURlN(i WITH 
NO TXACTION. 



MOV 


♦MAPLNS.R5 


JSR 


PC.TXD^BL 


MOV 


ACTLNS.R5 


MOV 


<>004.RO 


JSR 


PC.WTWLNC 


HOV 


• I //6/O.RO 


JSR 


PC.WTUl PR 


MOV 


«10. .R4 


JSR 


PC.DFLAt 



1:1') 
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Sta 166 



7323 



7??4 
75cT. 

75^6 

75;v 

73^^8 

73^9 

7330 

7531 

7532 

7335 

7534 

7 535 

7336 

753; 

7338 

735«> 

7540 

7341 

754P 

734 3 

734" 

7345 

7546 

7347 

7548 

7549 

7 550 

7551 

735? 

7353 

7554 

7355 

7556 

755; 

7358 

7559 

7360 

7361 

7562 

7363 

7364 

7565 

736b 

75b ; 

7 568 

7 569 
7 5/0 
73/1 
737^ 



0521 or 

052102 
052106 
032112 
052116 
052122 
052124 
032130 



052154 
052140 

052142 
052144 
032146 
052150 
052154 
032156 



032160 
052164 
052170 
052172 
052176 
032202 
032204 
052206 
052210 
052214 
032220 



052222 
052224 
052250 
052252 
052240 

052244 
052252 
052252 
052254 
05225b 
052260 
052266 
032270 



012/46 
012746 
016746 
012746 
104437 

062 ;o6 
004767 



016705 
005001 

000241 
006005 
103067 
110177 
010103 
000305 



012700 
010377 
105205 
1105/; 
062705 
O053OO 
O01367 
005002 
117702 
122702 
001425 



O101O4 
012701 
O10346 
012767 
012705 



000300 
01 7 734 
150100 
000005 

00(K>10 
165122 



SfcTVEC TXVtCA./?TXAINT»<^PRI06 



150060 



150052 



000005 
150044 

150056 
000401 



150020 
OJ0067 



000067 

015562 
010000 



104460 
012605 
010401 
052 76 7 
O01OO2 
000167 



000 100 
000444 



151612 



012767 012276 151604 



147722 



JSR 



PC.TXIfcl 



iSFT THf: TX INT ENABLE BIT IN 



MOV 


OPRICN, (■">?) 


MOV 


^TXAINf, ('jtP 


MOV 


TXVECA. (5P) 


MOV 


#5. C5P) 


TRAP 


CiSVEC 


ADD 


#10. SP 


THE CSR. 





1 
1 
I 
I 

I 

I • 



WRITE 64 CHARACTERS TO ALL TXf IFO'S USING ALTERNATE WORD/BYTE WRITES 
TO EXERSISE THE BYTE SWAPPtR. AKTER THE EIRST 9 CHARACTERS HAVE BEEN 
WRITTEN CHECK THAT THE F'lFOSIZE REGISTER SHOWS THE CORRECT N'JMBER OF 
FREE BYTES IN THE FTFQ. 



2t: 



MOV 
CLR 

CLC 
ROR 
BCC 
MOVB 
MOV 
SWAB 



ACTLNS.RS 
Rl 



R5 

lOf 

Rl.OCSRA 

H1,R3 

R3 



iSET UP THE ACTIVE LlNt hlT MAP. 
iSET UP THE FIRST LINf hXJMTiJP 

iCLEAR THE CARRY BIT RSADY FOf* Tt ^ DOTATION. 
iROYATE THE ACTIVE LINE BIT MA"» INTO THE CARRr 
lAVOIO TESTINli THIS LINE IF IT'J INACTIVE. 
(LOAD THE LINE NUMBER OF THE UUI INTO THE CSR. 
(INITIALISE THE DATA PATTERN FOR THIS LINE BY, 
(PUTTING THE LINE NUMBER IN THE HIBYTE AND 
(CLEARING THE LOBYTE. 



I 

1 
1 - 

4$ 



LOAD 9 CHARACTERS INTO THE TXFIFO AND CHt'CK THE FIFOSIZE REGISTER 



MOV 

MOV 

INCB 

MOVB 

ADO 

DEC 

8NE 
CLR 
MOVB 
CMPB 

BEQ 



*5,R0 

R5.»DATA 

R5 

RS.SFDATA 

♦401, R3 

RO 

4t 

R2 

» SI SA.R2 

055. .R2 

6t 



(LOOP COUNT . 

(MOVE A WORD OF DATA INTO THE FIFO. 

(INCREMENT THE LOCiYTE OF THE DATA PATTERN. 

(MOVE A BYTE O DATA INTO THE fIFO. 

(INCREMENT THE HIGH AND LOW BYTE Of THE DATA, 

(DECREMENT THE LOOP COUNT. 

(BRANCH IF NOT ALL 9 CHARACTERS WRITTfN. 

(CLEAR THE UPPER AND LOWER BiTE O R2. 

(READ THE f IFOSIZF REGISTER. 

(COMPARE THE EXPECTED SI/E WITH THf. ACTUAl . 

(AVOID THE ERRL^ REPORT IF THE Sl/E IS CORRECT. 



( ♦ 
( 
I * 



REPORT THf: ERROR. INCORRECT VALUE. >>>^» 6002 <<<<< 



MOV RI.R4 

MOV •55.. R I 

MOV R5, (SP) 

MOV »6002. .ERRNBR 

MOV tfFM6002.H5 

MOV 0ER6001.ERRBLK 
ERROR 

MOV ^SP).,R5 

HOV R4.RI 

BIT tffiIT06, OPTION 

BNt 61 

JMP 60 » 



(PASS THE LINE NUMBER TO THE. ERROR ROUTINE 

(PASS THE EXPECTED FIFO SiZf . 

(SAVE THE DATA PATTERN. 

(StT THE ERROR NUMBER TO 6002. 

(PASS THE MESSAGE. 

( "INCORRECT VALUE IN FIFOSI/F RFGT 

iSET THE. ERROR REPORTUXi ROUTINE. 



5TER 



TRAP 



U RWOW 



(RESTORE THE PATTERN. 

(RESTORE The LINE. N^JMBER. 

(HAS EXTENDED ERROR REPORTING BEEN 

(CONTINl< if it HAS. 

(EXIT THE TPST IF IT HASN* T. 



REUL»tiaTEU 



CUNTXNUt FILLING UP THt I- UC UNTIL 04 



CHARACTERS 



HAVt QttN LOAOtO. 



C70HVH0 OHU :i 
HARDWARE TtST 



FUNC TST 



PART.? MACRO 
- TXFIFO 



hi!:) 
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StQ 18/ 



75/3 
75/4 

75 ;s 

7576 
75/; 
7578 
75 79 
7580 
7581 
7582 
7585 
7584 
7 58T) 
7586 
7 58 7 
7588 
753^ 
7590 
7 591 
7 59? 
7595 
7594 
7595 
759^ 
754/ 
7598 
7399 
7400 
7401 
740^ 
7405 
7404 
7405 
/406 

7no/ 

74 08 
7409 
7410 



7411 
741.^ 
7415 



V414 
7415 
7416 

741/ 
7418 
7419 
74^0 
7421 
7422 
742 5 
7424 
74^5 



052274 
052500 
052304 
052306 
052512 
052516 
052520 
032322 



052526 
052550 
052552 
032334 



052556 
052342 

032544 

032546 
052550 
052552 
032356 
052360 
052562 
052570 
052574 
0525 76 
52402 
052406 
052414 
052414 
052420 
052422 
052426 
052452 
052452 
0524 56 
032440 



052446 
052452 
052456 
052460 
052464 
0524/0 
0324/2 



012/00 
010577 
105205 
110377 
062 705 
005300 
001567 
110377 



005 705 
001402 
005201 
000702 



016705 
005001 

000241 
006005 
10515' 
110177 
010105 
000505 
012767 
004 76/ 
105151 
00506 7 
00506 7 
052777 

012700 
104441 
012704 
004767 

012/00 
1C4441 
0427 77 



00526 7 
005 76 7 
001520 
00526 / 

00576/ 
100515 
022767 



000022 
14 7750 

147/22 
000401 



147706 



! 

ht 

8$ 



147656 



14 7650 

013565 
162774 

14/^/0 
14 /666 
100000 

OO020O 

0O0144 
161650 

0O0240 

lOOOOO 



1 LOOP 
ioJ: 



MOV 


018. .RO 


MOV 


RS.arOATA 


INCB 


R5 


MOVB 


RS.arOATA 


ADD 


0401, R3 


DEC 


RO 


BNE 


81 


MOVB 


R3.SFD.ua 


INTIL 


fHE TXFIFO' S 


T5T 


R5 


BEU 


121 


INC 


Rl 


BR 


21 



I SET UP THE OUTER LOOP. 

iMOVE A WORD OF DATA INTO THE FIFO. 

^INCREMENT THE LOBYTE OF THE DATA PATTERN. 

iMOVE A BYTE OF DATA INTO THE FIFO. 

(INCREMENT THE HIGH AND LOW BYTE OF THf. DATA 

iDECREMENT THE LOOP COUNT. 

(BRANCH IF NOT ALL 54 CHARACTERS WRITTEN. 

iLOAD THE 'AST CHARACTER. 

ON ALL ACTIVE LINES HAVE BEEN FILLED. 

iHAVE ALL FIFOS BEEN FILLED. 

I YES, THEN GO AND TRANSMIT THE CHARACTERS. 

(OTHERWISE SELECT THE NEXT LINE. 

(AND BRANCH TO TEST IF ITS ACTIVE. 



ENABLt TRANSMISSION ON EACH LINE IN TURN ANO WAIT F0« 100 MS TO ALLOW 
ANY INTERRUPTS TO OCCUK BEFORE DISABLING TRANSMISSION. VERIFY THAI ONI i 
INTERRUPT OCCUREO ANO CHECK THAT THE CHARACTERS WERE TRANSMITTED UNCORUPTED 
Ar« ON THE CORRECT LINE. 



I2t: 



14J 



151462 



14 7626 



MOV 
CLR 

CLC 

ROR 
BCC 

MOVB 

MOV 

SWAB 

MOV 
JSR 
BCC 

CLR 

CLR 

BIS 
SETPRl 



MOV 
JSH 
btTPRl 



ACrLNS,R5 
Rl 



R5 
241 

Rl,aCSRA 

Rl,R3 

R5 

06005. .ERRN8R 

PC.PUFIFO 

501 

TXINTC 

TXINTF 

06iri5.aTXAD2A 

0PRI04 



0100. .R4 

PCGUAY 
0PRI05 



iSET UP the: ACTIVE LINE BIT MAP. 
jSEi" UP THE FIRST LINE NUMBER. 

[CLEAR THE CARRY BIT READY FOR THE ROTATION, 
(ROTATE THE ACTIVE LINE BIT MAP INTO THE CARRY 
(AVOID TESTING THIS LINE IF ITS INACTIVE. 
(LOAD THE LINE NUMBER Of^ THE UJT INTO THE CSR. 
(INITIALISE THE "EXPECTED" DATA PATTERN FOR 
(THIS LINE. 

(SET THE ERROR NUtfJER TO 6005. 
(PURGE THE RXFIFO. 

THE FIFO WOULD NOT PURGE. 

COUNT , 

FLACS. 
itNAHLE TRANSMISSION ON THIS LINE. 



(REPORT THE ERROR IF 
(CLEAR THE, INTERRUPT 
(CIEAR THE INTERRUPT 



(ALLOW DEVICE INTERRUPTS. 



(SET THE DELAi 
(DELAY FOR 100 



MILLI StCS. 



147574 



BIC 



0eiTl5,aTXAD2A (DISABIE TRANSMISSION ON THIS I 



MUV 
TRAP 



MOV 
TRAP 
IN^ . 



OPRI04,R0 
CSSPRl 



OPRI05,RO 
CSSPRl 



151400 
14/614 

151566 
14 7604 

OOOCOl 14V572 



VERU T THAT ONLY ONE INTERRUPT 
A CORRESPONOINC TX ACTION. 



OCCURED ANO THAT IT WAS ACCOMPANIED Ul 



ir.'C 

TST 
HLQ 

INC 

TST 
BM[ 

CMP 



ERRNBR 

TXINTC 

50 i 

ERRNBR 

TXINTf 

501 

Ol.TXINIC 



J SET THE ERROR NLWBER TO 6004. 

iH^S '^N INTERRUPT OCCURED ? 

(REPORT THE ERROR U NO INTERRL*'T OCCt^HEtJ. 

(SET THE ERROR NUMBbR TO 6005. 

,HA', AN INTERRUPT OCCURED WITHOUT A TX ACTION 

J. 'if PORT THt ERROR U L' HAS. 

iOIO UNti ONE INT UCCU« ? 



CZDHVBO DHOU 


rUNC T5T 


PART2 


HAROWARt rFST 




- TXFIF 


74u>6 032500 


001424 




7A^7 






74r>8 






74.^9 






74 50 05^50^ 


016702 


147564 


7451 052^06 


010104 




74?:> 052510 


012701 


OOOOOl 


7455 05c?514 


010346 




7454 03.3516 


012703 


010040 


7455 






7456 






74 37 052522 


00526 7 


151524 


745ft 052526 


012767 


012276 


7459 052554 






032554 


104460 




7440 052536 


012603 




7441 052540 


010401 




7442 032542 


032767 


000 100 


744 5 052550 


001473 




7444 






7445 






744*^ 






7447 






744 fl 






7444 






7450 






7451 052552 


01276/ 


0'.5567 


7452 052560 


005000 




74S5 052562 


012704 


000025 


7454 052566 


012702 


00000 J 


7455 032572 


004767 


163140 


7456 






745 / 






745« 052576 


105022 




7459 052600 


005/6 7 


147446 


7460 052604 


001055 




7461 






/462 052606 


005200 




7465 052610 


105205 




7464 052612 


000505 




7465 052614 


005502 




7466 052616 


001365 




746 7 






746fl U52620 


000505 




7469 032622 


005504 




/4/0 052624 


001560 




74 71 






74 72 052626 


004767 


165104 


/4 73 052652 


105004 




74 74 052654 


00576/ 


14 7412 


74 75 052640 


001057 




74/6 032642 


000422 




74/; 






74 /H 






74 ;<i 






7480 052644 


0l2/t. / 


OM^/1 


74ai 032652 


012705 


010243 
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BfcQ 16» (AVOID THE ERROR If ONLY ONF. INTERRUPT, 

! ^REPORT THF ERROR. MORE THAN ONE INTERRUPT. >>>>> 6006 <<<<^. 



SEU las 



151322 



147440 



MOV TXINTC.R2 

MOV R1.R4 

MOV 01, Rl 

MOV R5. (SP) 

MOV 0EM6003,R3 



INC ERRNBR 

MOV 0ER6001.ERRBLK 
ERROR 

MOV (SP)».R5 

MOV 04, Rl 

BIT oeiT06. OPTION 

BEQ 60$ 



ACTUAL NUMBER OF tNTF.RRUf>TS. 
LINE NUMBER. 



iPASS THC 

(PASS TNG 

J PASS THE 

I SAVE THE 

jPASS THE 

; "MORE THAN 

I TX FIFO". 

(SET THE ERROR NUMBER TO 

I SET UP THE ERROR BLOCK, 



INT' 



EXPECTED NUMBER OF 
DATA PATTERN. 
MESSAGE. 

ONE TX-INT OCCURED 

6006. 



FROM A FULL 



TRAP 



CiFRROR 



(RESTORE THE DATA PATTERN. 

(RESTORE THE LINE NUMBER. 

(HAS EXTENDED ERROR REPORTING BEEN RfcUUfcSTED 

(EXIT THE TEST IF IT HAS. 



t READ THE CHARACTERS FROM THE RXFIFO AND VERIFY THEY ARE CORRECT AND WERE 

( RECIEVED ON THE CORRECT LINE. 

; THIS SUBROUTINE REPORTS ERRORS. >*>>> 600 7 THRU 6008 <<<<<, 



151272 I6i 

181 

20$ 



MOV 06007. .ERRNBR 

CLR RO 

MOV 021.. R4 

MOV 05, R2 

JSR PC.REPDER 



BCC 221 

rST FXOERR 

BNE 601 

INC RO 

INCB R5 

SUAB R3 

DEC R2 

BNE 201 

SWAB R5 

DEC R4 

BNE IHI 

JSR PC.REPDER 

BCC 22 » 

Tsr LXOLRR 

BNE 60$ 

BR 24$ 



SET UP THE ERROR NUMBER TO 6007. 

INITIALISE THE NUMBER Of CHARS READ COUNT. 

SEI UP THE OUTER LOOP COUNT. 

SET UP THE INNER LOOP COUNT. 

READ A CHARACTER FROM THE RXFIFO, VERIFt THAT 

IT IS CORRECT AND CAME FROM THE UUT . REPORT 

ANY ERRORS. >>»>> 6007 THftU 6008 <<<»<. 

BRANCH TO REPORT THE ERROR IF THE FIFO EMPTi . 

TEST THE "EXIT ON ERROR" FLAG. 

EXIT THE TEST IF SET, I.E. AN ERROR OCCURED. 

AND NO EXTENDED ERROR REPORTING WAS REQUESTED, 

INCREMENT THE READ CHAR COUNT. 

INCREMENT THE L06YTE OF THE DATA PATTERN. 

SWAP BYTES TO PLACE EXPECTED CHAR IN LOByTE. 

DECREMENT THE INNER LOOP COUNIER. 

BRANCH TO READ ANOTHER ChAR IF 3 CHARS HAVE 

NOT BEEN READ. 

RESTORE THE DATA BYTES TO THE CORRECT POSITION 

DECREMENT THE OUTER LOOP COLf^TER. 

BRANCH TO READ ANOTHER 5 CHARACTERS IF NOT 

ALL 63 HAVE BEEN READ. 

READ AND CHECK THE LAST CHARACTER. 

BRANCH TO REPORT THE: ERROR IF THE FJFO EHPTi . 

TEST THE "EXIT ON ERROR" FIAG. 

EXIT THE TEST IF SET. 

OTHERWISE GO AND TEST ANOTHER I INE . 



1 REPORT THE ERROR, NOT All CHARACTERS TRMNSMITTED. 



^ > % \ "t 



b009 <<<<< 



151200 22$ 



MOV 06009. .tRHSBH 

MOV oEM6006.Ri 



jSM THl ERROR NUMBER TO 6009 
J PASS THE MESSAGE, 



1-i 1 'y 



C/DHVHO DHU 11 FUNC 
HARDWARE TKST 



TST PART^' MACRO M1200 
- TXFIFO 
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SbQ 169 



748c'> 
7485 
7484 
748*=. 
7486 
7487 

7488 

7489 
7490 
7491 
749.^ 
7495 
7494 
749r) 
749f. 
749/ 
7498 
7499 
7500 
7501 
750^ 
7505 
7504 
7505 



7506 
7507 



7508 
7509 



052656 
052660 
052664 
052666 
052674 
052674 
052676 
052700 
052706 



o5?ao 

052712 

052714 
052716 

052720 
052724 
052 726 
052 754 
052740 
052740 
052744 
052746 
052 752 
052752 
052 756 
052 760 
052 764 
0527M 
052764 



010104 
012701 
010002 
012767 

104460 
010401 
052767 
001414 



005705 
001405 

005201 



004767 
000405 
012767 
004767 

012700 
104441 
004767 

016700 
104456 
005067 



104401 



000100 
012276 



151162 



000100 147302 



MOV R1,R4 

MOV 064., Rl 

MOV R0.R2 

MOV OER600l,ERRBUK 
ERROR 

MOV R4,R1 

BIT *eiT06. OPTION 

GEO 60 t 

I U ALL ACTlVt I.INFS HAVE Bf-'.N 
I TEST ANOTHER LINE. 



165746 

015572 
165514 

0O0540 

164244 

147240 

14 7264 



151116 



24$: 


TST 
BEQ 


P5 
52$ 




INC 
BR 


Rl 

14* 


50$: 
52$: 
60$: 


JSR 
BR 

MOV 
JSR 
SETPRI 


PC.TSABRT 

60$ 

06010. .tRSNBR 

PC.REPSMR 

0PRI07 




JSR 
CLRVEC 


PC.TXIEO 
TXVECA 


62$; 


CLR 
ENOTST 


CTRLCF 



I "TX FIFO BAD. TOO FEW v^'HARS HtClEVtO" 
iPASS THE LINE NUMBER OF THE UUT . 
iPASS THE EXPEC TED NUMBER OF CHARACTfRS. 
(PASS THE ACTUAL NUMBER RFCIEVED. 
iSET UP THE ERROR REPORTING i^OUTINE . 

TRAP CJERROR 
(RESTORE THE LINE N'tlBER. 

.HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 
.•I-XIT THIS TEST IF IT HAS. 

TtSTED THEN EXIT THE TEST. OTHERWISE BRANCH TO 



.•HAVE ALL LINES BEEN TESTED ? 

lYES. THEN GO AND REPORT ERROR SUMMARIES IF 

I NECESSARY. 

lO^.-tERWISE SELECT THf NEXT LINE. 

jAVO BRANCH TO TEST IF IT IS ACTIVE. 

iREPORT NON-RELATED TEST ERROR. 

jABORT THE TEST. 

iSET THE ERROR NUMBER TO 6010. 

iREPORT ERROR SUMMARIES IF NECESSARY. 

;DISABLE ALL INTERRUPTS. 

MOV OPR107,RO 
TRAP C iSPR I 

1 CLEAR THE TX INT ENABLE BIT IN THE DEVICE CSR. 

t CLEAR DOWN THE TX INT VFCTOR. 

MOV TXVtCA.Ro 
TRAP C$CVEC 

i INDICATE THAT Wt ARE NOT UITHIN A TEST. 



L 10045: 



TRAP 



C$ETST 



i 1 'J 
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SF.Q 190 



7511 
75 U' 
7515 
7514 
/51'i 
7516 
751/ 
75 It^ 
7519 
75^'0 
75?1 



75uM 

75:?5 

75?6 

75^7 

75r!8 

752^ 

7530 

7531 

75^? 

7533 

7534 

7535 

753f 

753; 

7538 

7539 

7540 

7541 

7542 

7543 

7 54 4 

7545 

7546 

754 7 

7548 

7549 

7550 

7551 

755^ 

/555 

7554 

7555 

7556 

755/ 

7558 

7559 

7^>60 

7561 

756,'^ 

7563 

7564 

;5^5 

7566 



032766 
032766 

032766 

03277*J 
033002 
033010 
033016 



033024 
033030 



035052 
033036 
033042 
035046 
033052 



0S3056 
033062 



035066 
033072 



055076 
035102 
053106 



012767 
000021 
012767 
012767 
012767 
012767 



004 76 7 
103165 



012705 
012700 
004 767 
012704 
004767 



01.2700 
004767 



016705 
004767 



005267 
004 76 / 
105136 



177777 147254 



000021 
00000 I 
014401 
010307 



161166 



177777 
000200 
164504 
000012 
161204 



156430 
164514 



14 7126 
164024 



150750 
162344 



147252 
151040 
151034 
151050 



5BT11. HARDWARE TEST BREAKB - 

• - BREAK GENERATION TEST - 

* THIS TEST VERIFIES THAT ALL SERIAL TRANSMIT LINES CAN GENERATE A BREAK 

♦ BY SETTING THE BRK BIT IN THE ASSOCIATED LNCTRL REGISTER. 

* USE or THE INTERNAL LOOPBACK FEATURE OF THE QUARTS IS MADE TO MINIMISE 

♦ ANY EXTERNAL EFFECTS CAUSED ON THE SERIAL LINES B. THIS TEST 

J* FRAMING ERROR DETECTION IS USED TO INOICAFE THE PRESENCF OF A u^EAK. 

1* BY SETTING THE APPROPRIATE BIT IN THt RBUT REGISTER. 



BGNTST 



MOV 

TNUM 

MOV 

MOV 

MOV 

MOV 



O-l.CTRLCF 
1 TNtJM » 1 
«TNUri.TSTNUM 
*1.ERRTYP 
^401. .ERRN6R 
*EM6401.EnRMSG 



Tl"'* : 

» INDICATE THAT WE ARE IN A TEST, 
i INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
iSET UP THE TEST NUMBER. (64) 
iSET ERROR TYPE AS FATAL IN FRROR TABLE. 
I SET THE FIRST ERROR NUMBER IN ERROR TABLE 
tSET ERROR MESSAGE ADDRESS IN ERRTBL . 



I RESET THE DUT TO A KNOWN STATE. REMOVE THE STATUS COOES FROM THE FIFO. 
I CLEAR TX AND RX INTERRUPT ENABl E BITS IN THE CSR. 
; THIS SUBROUTINE REPORTS ERROR >^^*^ 6401 <<<<<, 
i - 



JSR 
BCC 



PC.CLNRST 
601 



(RESET THE 
lEXIT TEST 



DHU-U. REPORT 
IF FATAL ERROR 



AN1 ERRORS FOUND 
FOUND. 



I * 



SET UP DEVICE UNDER TEST (OUT) TO; 

DISABLE TRANSMISSION AND RECEPTION INTERRUPTS. 

DELAY FOR 10 MILLI -SECONDS TO ALLOW TIME TO CLEAR ANY BREAKS. 

iPASS ACTIVE LINE BIT MAP. 

I PASS INTERNAL LOOPBACK MODE. 

i SELECT INTERNAL LOOPBACK .DISABLE DMA 

(PASS DELA^ TIME OF 10 MILLI SECONDS. 

jDELAY TO ALLOW ANY BREAKS TO BE CLEARED, 

!*SET UP TRANSMISSION AN RECEPTION PARAMETERS FOR ALL LINES, 
i 9600 BAUD, a CHAR. I STOPBIT.NO PARITY. 

HOV #156430. RO jSET UP BAUD RATE. ETC. 
JSR PC.WTWLPR jSET COMMUNICATION PARAMETERS ON ALL LINES. 

ENABLE TRANSMITTERS ON ALL ACTIVE LINES. 



MOV 


<W1APLNS.R5 


MOV 


•200, RO 


JSR 


PC.WTWLNC 


MOV 


#10. .R4 


JSR 


PC, DELAY 



MOV 
JSR 



ACrLNS.R5 
PC.TXENBL 



iPASS ACTIVE LINE BIT MAP. 

[ENABLE TRANSMISSIONS ON ALL LINES. 



! PtJRGE THE FIFO OF ANf UNWANTED CHARACTERS. 

I THIS ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 6402 THRU 0404 <<*<c. 



; 



INC 
JSR 
BCC 



ERRN6R 

PC.PUFIFR 

60$ 



iSET ERROR NUMBER TO 6402. 

I PURGE f IFO. 

jABORT TEST 11^ FIFO WILL NUT CLEAR. 



I VERIFY BREAK GENEHAaON UN INDIVIDUAL LINES. 



CZDHVHO DHU 11 FUNC TbT PA' '2 MACRO MUOO 
HARDWARE TEST - BREAKS 



I ' 



\.j 



] 5 
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SEQ 191 



7567 
7568 
7b69 
7570 
7571 
757.'* 
757-^ 
75 ?4 
7575 
7576 
7577 
7578 
7579 
7580 
7581 
758;? 
7585 
7584 
/585 
7586 
7S87 
7588 
7589 
7590 
7591 
759^ 
7595 
7594 
7595 
7596 
7597 
7598 
7599 
7600 



7601 
760.? 
7605 
7604 
7605 
7606 
760/ 
7608 
7609 
7610 
7611 
761? 
7615 
7614 
7615 
7616 
7617 
7618 
7619 



035110 
055112 
055116 
055122 
055124 
055150 
055154 
053140 



033144 
053146 
035152 



055156 
033162 
053166 
055172 
053176 
055200 

053204 
055204 
053206 
035210 
033212 



035214 
053222 



055224 
033226 

055250 
033234 



00500? 
012703 
030567 
001440 
01270*^ 
004 767 
012704 
004767 



010505 
012700 
004767 



012/04 
004767 
017700 
032700 
001012 
012701 



104455 
014405 
010307 
012400 



052/67 
001470 



006505 
005202 
02022/ 
001330 



000001 
147076 

000200 
164416 
000012 
161116 



000214 
164574 



000005 
161074 
147036 
020000 

010344 



I CLEAR BREAKS ON ALL LINES. 

I DELAY KOR 10 MILL! -SECONDS TO ALLOW TIME f OR ANY BREAKS TO BE CLEARED. 

i SELECT LINE. SET BREAK BIT IN LNCTRL REGISTER, 

: TEST FOR A CHARACTER IN THE FIFO WITH FRAME ERROR. 



2$ 
4$ 



I ♦ 



I CLEAR LINE COUNTER. 

jSET UP ACTIVE LINE BIT MASK. 

iCHECK IF THIS LINE IS ACTIVE. 

iGO SELECT NEXT LINE IF THIS ONE IS INACTIVE. 

iSET UP PARAMETER TO CLEAR BREAK BITS. 

I CLEAR BREAK BIT.RESELECT INTERNAL LOOPBACK. 

iPASS DELAY TIME OF 10 MILLI SECONDS. 

jDELAY ro ALLOW BREAKS TO BE CLEARED. 

SET BREAK BIT ON SELECTED LINE. 
SET UP PARAMETERS TO TEST FOR THE FRAME ERROR BIT SET IN RBUF. 
TIME-OUT - 5 MILLI SECONDS. 
CALL ROUTINE TO CHECK FOR CONDITION FOUND. 



CLR 


R2 


MOV 


*1.R3 


BIT 


R3.ACTLNS 


BEQ 


e« 


MOV 


«200.R0 


JSR 


PC.WTWLNC 


MOV 


910. ,R4 


JSR 


PC. DELAY 



65: 



i - 



MOV 
MOV 
JSR 



R3.R5 

*214,R0 

PC.W.'WLNC 



iCOPY ACIIVE LINE BIT MASK. 

(SET BREAK, RESELECT LOOPBACK .ENABLE RECEPTION 

•SET BREAK ON SELECTED LINE, 



I • 



DELAY FOR 5 MS TO ALLOW TIME FOR BRtAK TO BE GENERATED AND RECEIVED. 
VERIFY RECEPTION OF A CHARACTER WITH FRAME ERROR BIT SET. 



MOV 
JSR 
MOV 
BIT 
BNE 
MOV 
; REPORT 



*5. .R4 
PC. DEL AY 
aRBUFA.RO 
«6IT15,R0 
8) 

frEM6402.Rl 
ERROR "BREAK NOT 



I SET DELAY VALUE TO 5 Mil LI iECS. 
(ALIOW TIME FOR CHARACTER RECEPriON, 
(GET CHARACTER FROM RBUF REGISTER. 
1 CHECK FOR FRAME ERROR BIT. 
iSKIP ER^OR REPORT IF SET. 
(SELECT MESSAGE TO BE PRINTED. 
RECEIVED ON LINE ftNN" 



ERROF 6405,EM6401,ER6401 i 



>>>^> EWROR 



< < < < < 



<?6405 

TRAP 

.WORD 
.WORD 

WORD 



EXIT THE TEST IK EXTENDED ERROR REPORTING HAS NOT BEEN ENABl FD 



CiERDF 
640 
EM6401 
ER6401 



000100 146766 



I - 



8J: 



OOOO^iO 



BIT 
BEQ 



ASl 

INC 
CMP 
BNE 



«BIT06, OPTION 
60$ 



R5 

R2 

R2,0NUMLNS 

4» 



jEXiT WITH TEST FAILURE MESSAGE U 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

(DURING THE SOFTWARE QUESTIONS. 

(SHIFT BIT MASK FOR NEXT LINE, 

(NEXT LINE 

(CHECK FOR MAX LINE COUNT. 

(IF ^i.LOOP TO CHECK NEXT LINE 



J * 



VERIFY BREAK GENERATION ON ALL LINES SIMULTANEOUSLY. 
CLEAR BREAKS ON ALL LINES. 

DELAt FOR 10 MILLI'SECONDS TO ALLOW TIME FOR ANY BREAKS TO UE CLEARED, 
PURGE THE FIFO. 

SET BREAK BIT IN LNCTRL REGISTERS ON ALL ACTIVE LINES* 
TEST FOR CHARACTERS IN THE FIFO WITH FRAME ERROR. 



K15 



CZDHVBO DHU-11 1 


rUNC TST 


PART2 MACRO 


HARDWARe: TEST 




- BREAKS - 


7620 






7621 033236 


012705 


177777 


7622 033242 


012700 


000200 


7623 033246 


004767 


164300 


7624 033232 


012704 


000012 


7625 033256 


004767 


161000 


7626 






7627 






7628 






7629 033262 


004767 


162102 


7630 033266 


103044 




7631 






7632 






7633 






7634 






7635 035270 


(^6705 


146724 


7636 033274 


012700 


000214 


7637 033300 


004767 


164246 


7638 






7639 






7640 






7641 






7642 033304 


012704 


000012 


7643 053310 


004767 


160746 


7644 033314 


010502 




7645 033316 


004767 


161554 


7646 033322 


017701 


146702 


7647 033326 


100011 




7648 033330 


032701 


020000 


7649 033334 


001406 




7650 033336 


000301 




7651 033340 


042701 


177400 


7652 033344 


004767 


161300 


7653 033350 


040005 




7654 033352 


005302 




7655 033354 


001362 




7656 033356 


005705 




765 7 033360 


001411 




7658 03336? 


012701 


010344 


7659 






7660 053566 






033566 


104455 




053370 


014406 




055372 


010307 




033574 


012400 




7661 033376 


000402 




7662 






7663 055400 


004767 


165266 


7664 033404 


005067 


146640 


7665 033410 






035410 






033410 


104401 
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SEQ 192 



I - 



MOV <^MAPLNS,R5 

MOV #200. RO 

JSR PC.UTWl.NC 

MOV 010.. R4 

JSR PC, DELAY 



iSET UP LINE TO CLEAR BREAKS ON. 

jSET UP PARAMETER TO CLEAR BREAK BITS. 

» CLEAR BREAK BIT.RESELECT INTERNAL LOOPBACK 

iPASS DELAY TIME OF 10 MILLI GECONOG. 

I DELAY TO ALLOW BREAKS TO BE CLEARED, 



t * 



J PURGE THE FIFO OF UNWANTED CHARACTERS. 



JSR 
BCC 



PCPUFIFO 
505 



(PURGE FIFO. 

lt>U REPORT ERROR IF FAILED TO CLEAN.UUT FIFO 



I SET UP PARAMETERS FOR SETTING THE BREAK BIT ON ALL ACTIVE LINES. 
: THEN CALL ROUTINE TO DO IT. 



10$ 



I ♦ 



MOV 
MOV 
JSR 

DELAY FOR 
TEST FOR 



ACTLNS.R5 

«214,R0 

PCWTULNC 



jSET UP ACTIVE LINE BIT MASK. 

iSET BREAK, RESELECT LOOPBACK, ENABLE RECEPTION. 

iSET BREAK ON SELECTED LINES. 



10 MILLI SECONDS, TO ALLOW TIME FOR RECEPTION. 
CHARACTERS IN FIFO WITH FRAME ERROR BIT SET. 



(SET DELAY VALUE TO 10 MILLI SECS. 
jALLOW TIME FOR CHARACTER RECEPTION. 
(COPY ACTIVE LINE BIT MAP. 
I COUNT Tt-IE NUMBER OF LINES AVAILABLE. 
12$: MOV 8RBUFA.R1 jGET CHARACTER FROM RBUF REGISTER. 

iBRANCH IF DATA^VALIO NOT SET. 
jCHECK FOR FRAME ERROR BIT. 

jDO not CLR FLG FOR THIS LINE IF FRAME BIT CLR 
iGET LINE NUMBER IN LOW BYTE. 
iCLEAR EVERTHING BUT THE LINE NUMBER. 
iCALC BIT MASK FROM LINE NUMBER. 
[CLEAR LINE FLAG. 
14$: DEC R2 jDECREMENT THE LINE NUMBER COUNTER. 

;LOOP TO GET THE NEXT CHARACTER. 
(CHECK IF ANY BREAKS NOT RECEIVED. 
(EXIT TEST IF ALL CLEAR. 
(SELECT MESSAGE TO BE PRINTED. 
iREPORT ERROR"BREAK NOT RECEIVED ON LINE *NN". 

ERRDF 6406.EM6401,fcR640li >>>>> ERROR <?6407 <<<<<. 

TRAP C$ERDF 
.WORD 6406 
.WORD EM6401 
.WORD ER6401 
BR 60$ (EXIT THE TEST. 

(ABORT THE TEST. 

1 INDICATE THAT WE ARE NOT WITHIN A TEST. 



MOV 

JSR 
MOV 

JSR 
MOV 

BPL 
BIT 
BEQ 
SWAB 
BIC 

JSR 
BIC 
DEC 

BNE 
TST 

BEQ 
MOV 



#10. .R4 

PC, DEL AY 

R5,R2 

PC.MAPCNl 

8RBUFA.R1 

14$ 

*6IT15,R1 

14$ 

Rl 

#177400, Rl 

PC.LINBIT 

R0.R5 

R2 

12$ 

R5 

60$ 

#eM6402,Rl 



50$: 


j«;r 


PC.TSABRT 


60$; 


CLR 
ENDTST 


CTRLCF 



L 10046: 



TRAP 



C$ErST 



L 1 5 
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SEQ 193 



7667 








7668 








7669 








7670 








7671 








767^ 








7673 








7674 








7675 








7676 








767 7 








7678 








7679 








7680 








7681 


033412 
033412 






7682 


033412 








033412 


012700 


000240 




033416 


104441 




7683 




000022 




7684 


033420 


012767 


000022 146626 


7685 


033426 


012767 


177777 146614 


7686 


033434 


012767 


000001 150406 


7687 


033442 


012767 


014711 150402 


7688 


033450 


012767 


010405 150376 


7689 








7690 








7691 








7692 








7693 








7694 


033456 


004/67 


160554 


7695 


035462 


105402 




7696 


033464 


000167 


000432 


769 7 








7698 








7699 








7/00 








7701 


0534 70 


004767 


160774 


7 702 


055474 


105402 




7/05 


0354/6 


000167 


000420 


7704 


033502 


004767 


161042 


7/05 








7706 








7707 








7708 








7709 








7/10 








7711 








7712 








7/13 


053506 


005267 


150540 


7/14 


055512 


012700 


000204 


7715 


055516 


004 767 


164030 


7/16 


055522 


012700 


177670 


7717 


053526 


004 767 


164050 


7 718 


055552 


012/04 


000012 


7 719 


055556 


004/67 


1^0520 


7720 


035542 


012/02 


002650 



.SBTTL HARDWARE TEST - NORERR 

;♦ 
:* 

!* 

i* 
1* 

1* 

!♦ 
i* 
t* 
!* 

BGNTST 

I ALLOW LTC INTERRUPTS. 



NO OVP.RRUN ERROR TEST 

THIS TEST VERIFIES THAT THE DUT WILL NOT REPORT DATA OVERRUN 

ERRORS WHEN THEY DO NOT OCCUR. 

THIS TEST PUTS 256 CHARACTERS IN THE DUT FIFO PLUS 4 IN EACH ACTIVE 

UART AND VERIFIES THAT NO OVERRUN ERRORS ARE REPORTED. 

ANY BMP CODE FOUND WILL INVALIDATE THE TEST ANO CAUSE IT TO BE ABORTED. 

HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODE QUEUE. TO BE 

REPORTED LATER. 



T18:: 



SETPRI «PRI05 



TNUM 


■- TNUM f 1 


KOV 


*TNUM.TSTNUM 


MOV 


0-l.CTRLCF 


MOV 


*1,ERRTYP 


MOV 


^^6601..ERRNBR 


MOV 


*EM6601,ERRMSG 



MOV tfPRT05,R0 
TRAP CJSPRI 

I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

iSET UP THE TEST NUMBER. (66) 

J INDICATE THAT WE ARE IN A TEST. 

(SET ERROR TYPE AS FATAL TN ERROR TABLE. 

;SET ERROR NLTIBER TO 6601. 

I SET ERROR MESSAGE ADDRESS IN EHROR TABLE, 

! RESET THE DUT TO A KNOWN STATE. REMOVE THE STATUS CODES FROM THE FIFO, 
i CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
; THIS SUBROUTINE REPORTS ERROR i*>>^ 6601 <<<<<. 

JSR PC.CLNRST iRESET THE DHU-11, REPORT ANY ERRORS FOUND. 
BCS .♦6 (SKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 

JMP 60$ lEXIT THE TEST, FATAL ERROR WAS FOUND, 

FIND AN ACTIVE LINE ON WHICH TO PERFORM THE TEST. 
INITIALIZE THE 256 BYTE DATA PATTERN. 



JSR 
BCS 
JMP 
JSR 

; ♦ 

i TRANSMIT A 265 
; AT 38. 4K BAUD, 



PC.FINACT 
. ^6 
60$ 
PC.INOATP 



(FIND AN ACTIVE LINE. 

tSKIP EXIT OF TEST IF NO FATAL ERROR FOUND 
lEXIT THE TEST. FATAL ERROR WAS FOUND. 
(INITIALISE DATA PATTERN. 



CHARACTER DATA PATTERN USING DMA. 
8 BITS PER CHARACTER, ODD PARITY. 



ON A SINGLE CHANNEL 
2 STOP BITS. 



I SET INTERNAL LOOPBACK ON THE SELECTED LINE. 

J TRANSMIT THE DATA PATTERN ON THE FIRST AVAILABLE ACTIVE LINF. 



INC 


ERRN6R 


MOV 


«204,R0 


JSR 


PC.WTWLNC 


MOV 


O177670.ro 


JSR 


PC.WTWLPR 


MOV 


dlO. .R4 


JSR 


PC. DELAY 


MOV 


*BUFBAS,H2 



TO 6602. 
LOPBCK. ENABLE 
REGISTER. 



RX 



I SET THE ERROR REPORT NUMBER 

[PASS PARAMETER FOR INTERNAL 

lINITIlAISF THE LINE CONTROL 

(PASS THE LPR CONTENTS. 

(SET THE LPR CONTENTS TO 58. 4K BAUD. 

(PASS DEI AY TIME OF 10 MILLI StCONOS. 

(WAIT FOR LNCTRL AND LPR REGS TO BE LiPDATtD, 

(PASS THE START OF THE DATA PATTERN TU TX. 



S^RM.'^Ws} 



1 fWC rST PA 



'.'m 



^^MACRO M1200 
ERR - 



15-M/?R-84 09:28 
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PAGE 122-1 



SEQ 194 



7721 

7^22 

7725 

7724 

7725 

7726 

7727 

7728 

7729 

7750 

7/51 

7732 

7733 

7734 

7735 

7736 

7757 

7 75e 

7739 

7740 

7741 

7742 

7743 

7744 

7745 

7 746 

7747 

7748 

7749 

7750 

7751 

7752 

7753 

7 7I>4 

7755 

77L6 

7757 

7758 

/759 

7 760 

7 761 

7762 

7763 

7764 

7765 

7766 

7767 

7768 

7/69 

7770 

7771 

7772 

7773 

7774 

7775 

7//6 

7777 



033546 
053552 
033556 



033560 
053564 
033570 
033574 
033600 
033602 
033606 



03361;* 
033616 
035622 
053626 
033632 
035636 
033642 

055646 
033652 
033656 
035660 
053664 
035666 
053670 
035676 
035700 
055704 
053706 
033710 
035714 

053716 
033722 
033726 
035732 
033736 
053740 
033744 



053750 
033754 
035760 
053762 
033764 
033770 



012703 000400 
004767 160622 
103157 



005267 
012701 
016702 
004 767 
103146 
012704 
004767 



016705 
012700 
004767 
012700 
004767 
012704 
004767 

012702 
012V03 
005001 
005267 
OIOIOO 
006500 
036067 
001403 
004767 
103104 
005201 
020127 
002763 

005267 
012701 
016702 
004767 
103067 
012704 
004767 



016702 
00476/ 
00t502 
006302 
01P705 
060205 



150266 
170536 
146432 
163636 

000005 
160450 



146402 
000204 
163724 
177670 
163744 
000012 
160414 

002650 
000004 

150166 



002336 
160474 

000020 



150130 
170040 
146274 
163500 

000005 
160312 



146244 
160716 



000400 



nov 
JSR 
BCC 



#BUFMID-BUFBAS,R3 jPASS THE LENGTH OF THE DATA PATTERN, 

PC.DODMA tTRANSHIT THE DATA PATTERN. 

50$ (EXIT IF ERROR FOUND DURING DMA TX. 



1 ♦ 



I - 



146322 



WAIT FOR DMA TO COMPLETE. THEN WAIT FOR THE LAST CHARACTER TO ARRIVE IN 
THE FIFO. 

J SET ERROR NUMBER TO 6603. 

(PASS TIME-OUT VALUE OF 350 MILLI SECS. 

I PASS THE ADDRESS OF THE CSR. 

(WAIT FOR DMA TO COMPLETE. TX ACTION SET. 

(ABORT THE TEST IF TIME-OUT ON DMA COMPLETION. 

iPASS DELAY OF 5 MILLI SECS. 

(WAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



(ALTER PARAMETERS FOR ALL ACTIVE LINES. 

(PASS PARAMETER FOR INTERNAL LOPBCK .ENABLE RX, 

(INITILAISE THE LINE CONTROL REGISTER. 

(PASS THE LPR CONTENTS. 

(SET THE LPR CONTENT? TO 58. 4K BAUD. 

(PASS DELAY TIME OF 10 MILLI SECONDS. 

(WAIT FOR LNCTRL AND LPR REGS TO BE UPDATED. 

(PASS THE START OF THE DATA PATTERN TO TX. 
(PASS THE LENGTH OF THE DATA PATTERN. 
(CLEAR THE LINE COUNTER. 
(SET ERROR NUMBER TO 6604. 

(CALCULATE THE LINE OFFSET FROM THE LINE *. 
.ACTLNS (TEST FOR THIS LINE BEING ACTIVE. 

(SKIP THE TX ON THIS LINE IF IT IS NOT ACTIVE. 
(TRANSMIT THE 5 CHAR DATA PATTERN. 
(ABORT IF ERROR FOUND O'^ING DMA TX. 
4$: INC Rl (INCREMENT THE LINE COUNTER. 

(TEST FOR ALL POSSIBLE LINES HANDLED 
(LOOP IF NOT ALL LINES HANDLED. 

(SET ERROR NUMBER TO 6605. 

[PASS TIME-OUT VALUE OF 32 MILLI SECS. 

(PASS THE ADDRESS OF THE CSR. 

(WAIT FOR A DMA TO COMPLETE, TX ACTION SET, 

(ABORT THE TEST IF TIME! -OUT ON DMA COMPLETION, 

(PASS DELAY OF 5 MILLI SECS. 

jWAlT FOR LAST CHAR TO ARRIVE IN THE FIFO. 

READ THE FIFO CHECKING FOR OVERRUN ERRORS. REPORT ERRORS IF FOUND. 
A8CRT THE TEST IF A BMP CODE WAS FOUND IN THE FIFO. 



(GET THE NUMBER OF ACTIVE LINES. 
(MUITIPIY NUMBER OF ACTIVE LINES B> 4 
(CALCULATE NUMBER OF CHARACTERS TO RX 



2$: 





INC 


ERRNBR 




MOV 


*170556.R1 




MOV 


CSRA,R2 




JSR 


PC.WAIBIS 




BCC 


50 J 




MOV 


#5,R4 




JSR 


PC, DELAY 


TRANSMIT 4 


CHARACTERS ON 




MOV 


ACTLNS. R5 




MOV 


*204.R0 




JSR 


PC.WTWLNC 




MOV 


0177670. RO 




JSR 


PC.WTWLPR 




MOV 


*10. .H4 




JSR 


PC. DELAY 




MOV 


*6UFBAS,R2 




MOV 


*4,R3 




CLR 


Rl 




INC 


ERRNBR 


• 


MOV 


Rl.RO 




ASL 


RO 




BIT 


BITTBL(RO) 




BEQ 


4t 




JSR 


PC.DOOMA 




BCC 


50$ 


* 


INC 


Rl 




CMP 


Rl.ONUMLNS 




BLT 


2$ 




INC 


ERRNBR 




MOV 


0170040, Rl 




MOV 


CSRA,R2 




JSR 


PC.WAIBIS 




BCC 


50$ 




MOV 


05, R4 




JSR 


PC. DELAY 



MOV 


ACTLNS. R2 


JSR 


PCMAPCNT 


ASl. 


R2 


ASL 


R2 


MOV 


0256. ,RS 


ADD 


R2.R5 



N15 
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SEQ 195 



7 7 78 

7779 
7780 
7781 
778;? 
778? 
7784 
7785 
7786 
7787 
7768 
7789 

7790 
7791 
7792 
7793 
7794 
7 795 
7796 
7797 
7798 
7799 
7800 
7801 
7802 
7803 
7804 
780S 

7806 
780/ 
7808 
7809 
7810 
7811 
7812 
7815 
7814 
7815 
7816 
7817 
7818 
7819 
7820 
7S21 
7822 



033772 
033774 
034002 
034006 



034010 
034014 
034016 
034016 
034020 

034022 
034026 
034030 
034032 
034034 
034040 
034042 
034046 
034054 
034060 
034062 
034064 

034070 
034070 



034072 
034100 



005004 
012767 
017702 
100036 



034104 
034112 
034114 

034116 
034122 
034126 
034126 
034126 



004767 
103002 

104460 
000440 

005267 
005204 
020405 
003031 
032702 
001755 
005267 
012767 
012701 
010205 
000303 
042703 



104460 



032767 
001410 



054102 000754 



012767 
020405 
001402 

004767 
005067 



104401 



014716 
146222 



150050 6$: 



CLR R4 

MOV ^6606. .ERRNBR 

MOV SRBUFA,R2 

BPL 10$ 



jCLEAR THE CHARACTER COUNTER. 

(SET UP ERROR NUMBER EACH TIME AROUND L^OP 

jREAO A CHARACTER FROM THE FIFO. 

jEXIT THE READ LOOP IF THE FIFO IS EMPTK 



CHEC:< IF THE READ CHARACTER IS A BMP CODE. 
IF IT IS A BMP CODE SAVE IT ON THE QUEUE TO BE REPORTED LATER. AND 
ABORT THE TEST, 



157762 



150024 



040000 

150004 
012506 
010442 



177760 



8i 



150002 



JSR 
BCC 
ERROR 

BR 

INC 
INC 

CMP 
BGT 

BIT 
BEQ 
INC 
MOV 
MOV 
MOV 
SWAB 
BIC 
(REPORT " 

ERROR 



PC.CHKBMP 

a* 



60$ 

ERRNBR 
R4 

R4,R5 
50i 

*eiT14,R2 
6$ 

ERRNBR 

*EH7801,ERRBLI< 
^►EM6602.R1 
R2,R3 
R3 

*177760,R3 
OVERRUN ERROR 



I CHECK IF CHARACTER IS A BMP CODE. 

I BRANCH IF NOT A BMP CODE. 

J >>>>> ERROR <?6606 <<<<<. 

TRAP C$ERR0R 
lEXIT THIS TEST. 

tSET ERROR NUMBER TO 6607. 

; COUNT THIS CHARACTER. 

(COMPARE OF CHARS WITH MAX OF CHARS. 

(ABORT TEST IF TOO MANY VALID CHARS READ. 

(TEST THE OVERRUN BIT OF THE READ CHAR. 

I LOOP TO READ THE NEXT CHAR IF NO ERROR. 

(SET ERROR NUMBER TO 6608. 

(SELECT THE CORRECT ERROR REPORTING ROUTINE. 

(PASS THE MESSAGE TO BE REPORTED. 



iGET FAILING LINE NUMBER. 
REPORTED WHEN NONE FORCED. ON LINE NN . 
: >>>>> ERROR 06608 



< < <<< 



TRAP 



C$ERROR 



000100 146110 



EXIT T '^ TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



014721 147740 10$ 



162550 
146122 



50$ 
60$ 



Bl . •0BIT06. OPTION 

BEQ 60$ 



BR 6$ 

MOV ^6609. .ERRNBR 

CMP R4.R5 

BEQ 60$ 

JSR PC.TSABRT 

CLH ClHLCf- 
ENDTST 



(EXIT WITH TEST FAILURE MESSAGE IF 

(NO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

(DURING THE SOFTWARE QUESTIONS. 

(LOOP TO READ THE NEXT CHAR. 

;5ET ERROR NUMBER TO 6609. 

(COMPARE NUMBER OF CHARS READ WITH EXPECTED. 

(EXIT TEST WITHOUT ABORT IF CORRECT ^ OK CHARS. 

(ABORT THL TEST. NON-RELATED TEST ERROR FOUND. 
(INDICATE THAT WE ARE NOT WITHIN A TEST. 



L1004 



TRAP 



CSLrST 



C/OMVOO DHVi II 
HAROWARb TtST 

7SJS 

' 0»r. ' 

7H?8 

76t*'^» 
7850 

785.^ 
785? 
7854 
785^ 
7856 

y II » • 

785fl 054150 

054X50 

7859 054150 

054150 

054154 

7840 

7641 054156 
7842 054144 
7845 054H? 
;844 054160 
7845 034166 
7846 

784 7 
7B4B 
7849 
7850 
7851 
7852 
7855 
7854 
7855 
7856 

785 7 
7858 
7859 
7860 
7861 
786? 

786 5 
7864 
7865 
7ftt,6 
786 7 
7868 
7869 
78 70 
78/1 
7872 
78 7 5 
78 M 
^875 
78 76 
Vti7V 



Kt.*NC TbT 



0541/4 
054200 
054202 



054206 
054212 
054214 
034220 



054224 
054250 
054254 
054240 
54244 
054250 
054254 

034*^60 



012700 
104441 
000025 
012767 
012 767 
012767 
012767 
012767 



004 767 
105402 
000167 



004 76 7 
105402 
0O0167 
004767 



00526 7 
012/00 
004 76/ 

012/00 
004 76 7 
012/04 
004/6 7 
OU702 



PART 2 
- ORERK 



000240 



000025 
177/77 
00000 1 
015055 
010514 



160016 
000660 

160256 

000646 
160524 



14/622 
000204 

165512 
1/76 70 
165552 
0000 1 2 
160002 



10 1 b 
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5EQ 196 



SBTTL HARDWAME TFST 



ORERR 

OVERRUN ERROR TEST 



THIS TEST VERIFIES THAT THE OUT WILL REPORT DATA OVERRUN ERRORS WHEN 
THEY OCCUR. 

THIS TEST PUTS 256 CHARACTERS IN THE OUT FIFO PLUS 5 IN EACH ACTIVE 
UART AND VERIFIES THAT OVERRUN ERRORS ARE REPORTED ON ALL ACTIVE LINES. 
ANY BMP CODE FOUND WILL INVALIDATE THE TEST AND CAUSE IT TO OE ABORTED. 
HOWEVER THE BMP CODE WILL BE PLACED ON THE BMP CODE QUEUE. T") BE 
REPORTED LATER. 



BGNTST 

SETPRI 0PRI05 



146110 
146076 
147670 
14 7664 
147660 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



' TNUM • 1 
• TNUM.TSTMJM 
•-I.CTRLCF 
♦l.ERRTYP 
♦6 701. .ERRNBR 



T19:: 
lALLOW LTC INTERRUPTS. 

HOV ♦PRI05,R0 

TRAP C$SPRI 

(INCREMENT TH£ ASSEt«LY TIME TEST COUNTER. 
iSET UP THE TEST NUMBER. (6/) 

I INDICATE THAT WE ARE IN A TEST. 
iSET ERROR TYPE AS FATAL IN ERROR TABIC . 
iSET ERROR NUMBER TO 6701. 



«M6701,ERRMSG jSET ERROR MESSAGE ADDRESS IN ERROR TABl E . 



I • 

I 
I 
1 
I ' 



1 
1 
I - 



RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS COOES KRUM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN 'HE CSR. 
THIS SUBROUTINE REPORTS ERROR >>>>> 6701 <<<<<, 



JSR 
JMP 



PC.CLNRST 

. '6 

60) 



(RESET THE OHU 11, REPORT ANT ERRORS FOUND. 
(SKIP EXIT OF TEST IF NO FATAL ERROR FOUND. 
lEXIT THE TEST. FATAL ERROR WAS FQUNO. 



f INO AN ACTIVE LINE ON WHICH TO PERFORM THE TEST 
INITIALISE THE 256 BYTE DATA PATTERN. 



JSR 


PC.FINACT 


BCS 


. '6 


JMP 


60 1 


JSR 


PC.INOATP 



(FIND AN ACTIVE LINE, 
|If ACTIVE LINE IS FOUND. DON' 
lABORT TMt TEST. NO ACTIVE LIN 
I INITIALISE DATA PATTERN. 



ABORT 
, WERE 



Tf ST . 
FOUND, 



I ♦ 
1 
1 
I- 



TRANSMIT A 265 CHARACTER DATA PATTERN USING DMA. 
AT 38. 4K BAUD. 8 BITS PER CHARACTER, ODD PARITY. 



ON A SINGLE CHANNEL 
2 STOP BITS. 



SET INTERNAL 
TRANSMIT THE 



LOOPBACK ON THE 
DATA PATTERN ON 



SELECTED LINE. 

THE FIRST AVAILABLE 



ACTIVE LINt 



INC ERR^«R 

MOV #204. RO 

JSR PC.WTWINC 

MOV #17/670. RO 

JSR PC.WTWtPR 

HOV #10.. R4 

JSR PC.OE' Ai 

HQV ffBU^TiAi»R*; 



I SET ERROR NUMBER TO 6/02. 

(PASS PARAMETER FOR INTERNAL LOPBCK .ENABLE RX 

lINITILAISE THE LINE CONTROL REGISTER. 

iPASS THE LPR CONTENTS, 

iSET THE LPR CONTENTS TO 58. 4K BAUD. 

(PASS DELAY TINE OF 10 MILL! SECOND^. 

[WAIT fOR INCTRL AND LPR REQS TO m Lf»DAMa» 



iPAiii* 



THt iiTART Qf THt DATA PATTERN TO TX. 



C 1 b 
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GtQ 197 



7ft 78 
7fl79 

7680 

/8B1 

785.*^ 

7885 

:884 

788S 

7886 

7887 

7888 

7889 

7890 

7891 

7892 

7895 

7894 

7895 

7896 

7897 

7898 

7899 

7900 

7901 

790? 

7905 

7904 

7905 

7906 

790 7 

7908 

7909 

7910 

7911 

7912 

7913 

7914 

7915 

7916 

7917 

7918 

7919 

79?0 

79. >1 

792? 

7925 

7924 

7925 

7926 

792 7 

V**28 

/'*29 

79 50 

7951 

7*^52 

795 5 

7934 



054264 
054270 
054274 
054276 



054 502 
054506 
054512 
054516 
054522 
054524 
054550 
034534 



054540 
054544 
054550 
0545S4 
054 560 
054564 
054570 

054574 
054400 
054404 
054406 
054412 
054414 
054416 
054424 
054426 
054452 
054454 
054440 
054442 
054446 

054450 
054454 
054460 
054464 
0544 70 
0544 72 
054476 



054502 
054506 
054514 
054 'j20 



<^12705 
004 767 

105402 
000167 



00526 7 
012701 
016702 
004 767 
105402 
000167 
012704 
004767 



016705 
012700 
004 767 
012/00 
004 767 
012704 
004767 

012702 
012703 
005001 
00526 7 
010100 
006500 
056067 
001405 
004767 
103402 
000167 
005201 
020127 
002761 

00526 7 
012701 
016702 
0O4767 
105174 
012704 
004767 



000400 
160104 

000560 



14 7544 

170556 
145710 
165114 

000552 
000005 

157722 



145654 
000204 
163176 
177670 
165216 
000012 
157666 

002650 
000005 

147440 



002556 
157746 
0OO422 
000020 



147576 
170040 
145542 
1627-46 

000005 
157560 



012 704 000400 

012767 01506.^ 

017/02 X45510 
100160 



MOV 
JSR 

JMP 



^UTMID BUFBAS,R3 iPASS THE LENGTH OF THE DATA PATTERN. 
PC.OODMA I TRANSMIT THE DATA PATTERN. 

.♦6 I IF NO ERROR FOUND DURING DMA TX, DON'T ABORT 

50* lABORT TEST. ERROR FOUND DURING DMA TX. 



WAIT FOR DMA 
THE FIFO. 



TO COMPLETE, THEN WAIT FOR THE LASY CHARACTER TO ARRIVE IN 



I - 



INC ERRN8R 

MOV ♦! 70556, Rl 

MOV CSKA.R2 

JSR PC.WATBIS 

BCS . ^6 

JMP 50* 

MOV ♦5.R4 

JSR PC, DELAY 



SECT) 



iSET ERROR NUMBER TO 6703. 

iPASS TIME-OUT VALUE QT 550 MILLI 

(PASS !►£ ADDRESS OF THE CSR. 

iWAIT FOR DMA TO COMPLETE, TX ACTION SET. 

lIF NO TIME-OUT ON DMA COMPLETION. DON'T ABORT 

I ABORT TEST. TIME-OUT ON DMA COMPLETION, 

(PASS DELAY OF 5 MILLI SECS. 

iWAIT FOR LAST CHAR TO ARRIVE IN THE FIFO. 



i TRANSMIT 



5 CHARACTERS ON EACH ACTIVE LINE 



145574 



MOV ACTLNS,R5 

MOV #204. RO 

JSR PC,WTWl.NC 

MOV #177670, RO 

JSR PC.WTWLPR 

MOV #10.. R4 

JSR PC. DELAY 

MOV oeUFBAS.R? 

MOV #5.R3 

CLR Rl 

INC ERRNBR 

2»: MOV Rl.flO 

ASL RO 

BIT BITTBL(RO).ACTLNS 

BEQ 41 

JSR PC.DODMA 

BCS ..6 

JMP 501 

4ti INC Rl 

CMP R1.©NUMLN3 

BLT 2$ 

INC ERRNBR 

MOV #170040. Ri 

MOV CSRA.n? 

JSR PC.WAIBIS 

BCC 501 

MOV •5.R4 

JSR PC.DPLAt 



ALTER PARAMETERS FOR ALL ACTIVE LINES. 

PASS PARAMETER FOR INTERNAL LOPBCK .ENABLE 

INITILAISE THE LINE CONTROL REGISTER. 

PASS THE LPR CONTENTS. 

SET THE LPR CONTENTS TO 58. 4K BAUO. 

PASS DELAY TIME OF 10 MILLI SECONDS. 

WAIT FOR LNCTRL AND LPR REGS TO BE UPDATED 

PASS TK START OF THE DATA PATTERN TO TX. 
PASS THE LENGTH OF THE DATA PATTERN, 
CLEAR THE LINE COUNTER. 
SET ERROR NU«ER TO 6704. 



RX 



CALCULATE LINE OFFSET FROM THE LINE 0. 

iTEST FOR THIS LINE JEING ACTIVE. 
SKIP THE TX ON THIS LINE IF IT IS NOT ACTIVE. 
TRANSMIT THE 5 LHAR DATA PATTERN. 
IF NO TIME-OUT ON DMA COMPLETION. DON' T ABORT 
ABORT TEST, TIh€-OUT ON DMA COMPLETION, 
INCREMENT THE LINE VJMBER COUN.ER. 
TEST FOR ALL POSSIBLE LINES HANDLED 
LOOP IF NOT ALL LINES HANDLED. 

SET ERROR NUMBER TO 6705, 

PASS TIME OUT VALUE OF 52 MILLI SECS. 

PASS THE ADDRESS OF THE CSR. 

WAIT FOR A DMA TO COMPLETE. Tx ACTION SET. 

ABORT THE TEST IF TIME OUT ON DMA COMPLETION. 

PASS OELAt of 5 MILLI SECS. 

WAIT FOR LAST CHAR TO ARRIVE IN THE f l^U. 



i • 

I RtAO 256 CHARS 
1 ABORT THE TEST 

1 



FROM 
IF A 



The 
BMP 



F UO 

cooe 



CHECKING f' 
WAS FOUND 



OR 
IN 



BMP 

THE 



COOES. 
FIFO. 



14733fc 61: 



MOV 
HOV 
MOV 
BHL 



•256. .R4 

#6 706. .tRRNQR 

ttflBgFA,R*> 
50 » 



I SET ,jP THE CHARACTER COJNTER. 
|SM i.)P tRROR NUMBER EACH TIME AROLiNO I 
iRlAJ A CHARACTtn FROM THf ( IFC. 
(ABUHT THE TEST IF DATA, VALID Iti CLEAR. 



I 0*^, 



kmmi "iVsi 



1 FUNC TST PA 



7955 

7956 

7457 

795e 

7959 

7940 

7941 

794.^ 

7945 

7944 

7945 

7946 

794 7 

7948 

7949 

7950 

7951 

795.' 

7955 

7954 

7955 

7956 

7957 

7958 

7959 

7960 

7961 

796? 

7965 

7964 

7965 

7966 

796 7 

7968 

7969 

79 70 

79 71 

79 /c" 

79 7 5 

79:4 

79/5 

79 76 

7^7 7 

7978 

79 79 

7980 

7981 

796^ 

7985 

7984 

7985 

7986 

798 7 

7488 

7989 

7990 

V991 



054522 
034526 
05455? 
054554 
054536 



054540 
054542 
054546 
034552 
054560 
054564 
054566 

0545 72 
054574 
054600 
054602 
034604 
034610 
034612 
054616 
034624 
034626 
034632 
034636 
034640 
034644 
034646 
034652 
034654 
034662 
054664 
0346 70 
034672 

0546 76 
054702 



054 704 
03A/06 
034714 
034/22 
034 724 
034752 
054754 
054 740 
34 742 
054 746 
54 754 
054/56 

054 /66 



005267 
004767 
105551 
005504 
001363 



005004 
012700 
004 7f. 7 
012767 
017702 
10004 7 
004767 
105531 
005267 
010200 
000500 
042700 
006500 
042702 
036067 
001516 
005267 
005760 
001006 
02022 7 
001414 
0560O4 
000411 
026027 
00207 7 
052702 
001402 
056 0O4 
005260 
000723 



005001 
012767 
056167 
001415 
026127 
002455 
036104 
001006 
00526 7 
02612 7 
001012 
062 701 
020 l.V 
Q0dU7 



'^i 



RP 
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PAOF 123 2 



SfcO i9fl 



14 7524 
157244 



005710 
157466 
015064 
145444 

157204 

147252 

177760 

007400 
002556 

14 7220 
005710 

1400OO 

002556 

005710 

040000 

002536 
003710 



01506 7 
002536 

005710 

0025 56 

147104 
005/10 

ooooc 

000040 



INC 

jr.n 

BLS 

DEC 
BNE 



ERRNBR 

PC.CHKBMP 

24* 

R4 

69 



I SET ERROR NUMBER TO 6/07. 

jCMCCK ir CHARACTER IS A BMP CODt . 

(REPORT ERROR AND ABORT TEST W A BMP CODE 

(COUNT THIS CHARACTER. 

iLOOP TF NOT 256 CHARS READ FROM riFO. 



I READ THE REMAINING AND VERIFY 1 OVERRUN PLUS 1 CHAR FROM f.ACH LINE 



I - 



147272 6»: 



145374 



000004 10 i 



121 



CLR R4 

MOV •ftXCNTB.RO 

JSR PC,CLR16U 

MOV ^708. .ERRN6R 

MOV BRBUrA.R2 

BPL 14$ 

JSR PC.CHKBMP 

BCS 241 

INC ERRNBR 

MOV R2.R0 

SUAB RO 

SIC #177760, RO 

ASL RO 

BIC #7400. R2 

BIT BITTBL(RO),ACTLNS 

BEQ 501 

INC ERRNBR 

TST RXCNTBCRO^ 

BNE 10« 

CHP R2, #140000 

BEU 121 

BIS BITTBL(R0).R4 

BR 129 

CMP RXCNTBCR0),04 

BGf 50 » 

BIT ♦eiT14.R2 

BEQ 121 

BIS BITTBL(R0),R4 

INC RXCNTB(RO) 

BR 8t 



I CI EAR THE OVERRUN ERROR FLAGS 



CLEAR RX CHAR COUNT TA8L6 . 

SET UP ERROR NUMBER EACH TIME AROUND I OOP. 

READ A CHARACTER FROM THE FIFO. 

GO ANALYZE THE RESULTS IF ALL CHARS READ. 

CHECK IF CHAR IS A BMP CODE. 

REPORT ERROR AND ABORT TEST IF A BMP CODE. 

SET ERROR NUMBER TO 6709. 



CALCULATE THE LINE NUMBER OF THE CHAR. 
FORM WORD TABLE OFFSET FOR TABLE ACCESS. 
REMOVE LINE NUMBER FROM THE READ CHAR. 

I TEST FOR ACTIVE LINE. 
.'.BORT TEST IF FOR INACTIVE LINE. 
SET ERROR NUMBER TO 6710. 
CHECK THE RX CHAR COUNTER FOR THIS LINE. 
IS THIS FIRST CHAR ON LINE? 
YES. TEST FOR NULL CHAR WITH OVERRUN. 
IS CHAR A NULL? 

NO, SET THE OVERRUN BIT ERROR FLAG FOR LINE 
GO COUNT THE CHAR AND CONTINUE, 

5TH CHAR ON THIS LINE? YES, ABORT. 

NO, CHECK OVERRUN BIT. 

IS OVERRUN BIT CLEAR? YES. GO C0L»4T CHAR. 

NO. SET THE OVERRUN BIT ERROR FlAG FOR i INE 

COUNT THIS CHARACTER. 

LOOP UNTIL ALL CHARS ARE READ FROM FIFO. 



TEST FOR ABORT CONDITIONS. ONLY NONE ABORT CONDITIONS ARE: 

1) 2 CHARS RXLD ON A LINE AND NO OVERRUN ERROR BIT FAILURE DETECTED 

2) 2 TO 4 CHARS RXED ON A LINE AND AN OVERRUN BIT FAILURE DETECTED. 



147156 
145276 

000002 



OOOOOi 



14t: 
16»: 



lai: 



CLR 

MOV 
BIT 
BEU 
CMP 

8LT 
BIT 

BNE 
INC 
CMP 

UNf 
AOO 
CMP 



Rl J INITIALIZE LINE LOOP. CLEAR LINE OFFSET. 

#'.711. .ERRNBR (SET UP ERROR NUMBER EACH TIME AROLiNO LOOP. 
BITTBI (RD.ACTLNS 

181 iLlNE ACTIVE? NO. NEXT LINE. 

MXCNTB(R1),#2 I YES. 

iFEWER THAN 2 CHARS RxFD? lES. AHORT. 

(NO. 

lOVFRRUN BIT ERROR Ft AC- SET? YES, NEXT I INE . 

iSET LINE NUMBER TO 6712. 



50 » 

BITTB: (R1).R4 



I8t 

ER'^NBR 

HXCNTB(Pn,02 

501 

#-\f'n 
Mi.oNm.ns*2 

I6t 



isor .: Chars rxfd? us, abort, no. ni-\t . ist 

(St r I INt- OFFSET TO "HE Nt XT L INI , 

(All I iNtS DUNE? NO, tOuP, yEs, CONTlNi't, 



1: 1 h 



HARDWARE JtST 



f'UNC TST 



ttOOO 
8001 

H00.'» 
.H005 
8004 
ft COS 

8006 
POO'' 
ttOO^ 
tt009 
8010 
8011 
80U' 
8015 
8014 
801!> 
8016 
8017 
8018 
801'J 
80-0 
80c>l 

80P5 
80(>4 
flO.^S 
ttO.»6 



054770 
054/76 
055000 
05!>00^ 
05S0O6 
05S010 
055012 
05S014 



05'>0.^6 
0550i>6 



055050 
055056 



055040 
05504 i' 
055046 
055050 
055054 

055056 
055056 
055056 
055060 

05506*? 
055066 

0550 /^ 
0550 ^^ 
0550 .'J 



01^767 
005001 
01010? 
056104 
00141S 
010105 
006205 
012/6 7 
012701 



104460 



052/67 
001413 



010201 
046104 
00140/ 

06:* 701 
0007M 



104460 
000402 

004/6/ 
005067 



104401 



fV\MT2 
- ORERR 
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SEQ 199 



I * 



015071 147054 



002356 



012506 14/034 
010546 



0003.00 145152 



002?. 56 



CHECK row OVERRUN ERROR BIT FAILURES, PRINT ERROR MESSAGE IF" FOUND. 

i SET UP ERROR NUMBER. 

I INITIALIZE LOOP. CLEAR LINE OFF^iET. 
20$! MOV R1»R2 (COPY THE LINE. OFFSET. 

(OVERRUN BIT FAILURE FLAGS ARE IN R4 . 
lERROR FLAG CLEAR? YES. NEXT LINE. 

[CALCULATE LINE NUMBER FROM LINE OFFSt T . 
(SELECT THE CORRECT ERROR REPORTING ROUTINE. 
(PASS THE MESSAGE TO BE REPORTED. 
(REPORT -OVERRUN ERROR NOT REPORTED CORRECTLY WHEN FORCED, ON LiNr NN ..." 
ERROR I >>>>> ERROR «6715 <<<<<. 

TRAP CJERROR 

!*fcXlT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

(EXIT WITH TEST FAILURE MESSAGE IF 

(NO EXTENDED E51R0R REPORTING HAS BEEN REQUESTED 

(DURING THE SOFTWARE QUESTIONS. 



MOV 


W>715. .ERRNBR 


CLR 


Rl 


MOV 


R1,R2 


BIT 


fiITTBL(Rl),R4 


BEQ 


221 


MOV 


R; .R5 


ASR 


R5 


MOV 


*^ER7801,ERRBLK 


MOV 


«EM6702,R1 



BIT 
BEQ 



♦eiTOe, OPTION 
60 « 



161604 

l45i:-6 



'2$i 



.4J 



50 i 
60 1 



MOV 

BIC 
BEQ 

ADD 
BR 

jRFPORT 
ERROR 

BR 

JSH 
CI R 

i.NDtbT 



BITTBL(Rl).R4 

601 

♦2,R1 

20 i 



(RESTORE THE LINE OFFSET THAT WAS DESTROreO. 
(CLEAR THE LINE ERROR FLAG Wt JUST HANDLED. 
(ALL FAILURE BITS HANDLED? tES, EXIT TEST. 
(NO, INCREMENT THE LINE OFFSET. 
(I OOP TO HANDLE THE NEXT LINE. 



BMP CODE FOUND IN FIFO. TEST INVAlLDATtD . ' 

, ^lii* ERROR <<<<« . 

TRAP 

(tXIT THIS TlrST. 



CJERROR 



60$ 

PC. TSAURT 
CTRLCF 



(ABORT THE TEST. ERROR O INOICATtS FAU T TYPE. 
(INDICATI THAT WE ARE NOT UlTHlN A TEST. 



L 10050: 



TRAP 



CSEIST 



CDMVHO UHU 11 
HARDUARl TF.ST 



80J^ 

8050 

80.^: 
ao3.^ 

805? 
8054 

yo5s 

80 5t^ 
805/ 
8058 
8059 



8040 
8041 
804(5 
804 5 
8044 
804 S 
804 f. 
804/ 
8046 
8049 
8050 
8051 
80SP 
8055 



8054 
8055 

805o 
805/ 
8058 



0550/4 
0550/4 

0550 74 
05510^ 
055110 
055114 
055 1?0 

ossiac? 



055U^4 
055? 50 
055 150 

055i:;.^ 

055154 
055156 



1( 



J 



K»NC TbT PART J MACRO Ml^OO 
■ REPBMP 
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ShQ if 00 



055146 
0^515(J 
05515^> 
035l5i? 



0000^4 
0UV67 
0lc?''67 
01670^ 
OU705 
O^O^'O? 
001411 



0000^4 
177777 
145.V4 
00i?4l<> 



14515:^ 
145140 



SBTTL HARDWARt TEST - REPBMP - 

*» 4k>«4t******«4.**«********«L**f***********4 ************** **•*«*««•* ********««^« 

- REPORT ANY BMP CODE?: IN THe QUtUE - 
THIS IS A PSEUDO-TEST USED TO REPORT ANT BMP COOES THAT WERE ^OUND 
IN THE DUT'S FIFO DURING PREVIOUS TEST, AND LO(iGED IN THE BMP :ODE 
QUEUE. 

IT IS UNLIKELY THAT RUNNING THIS PSEUOO-TEST ALONF WILL PRODUCE ANY 
ERROR REPORTS. 

BGNTST 

T20: : 
I INCREMENT THE ASSEMBLj TIME TEST COUNTER. 
(SET UP THE TEST NUMBER. (95) 

» INDICATE THAT UE ARE IN A TEST. 
jGET THE CONTENTS OF THE POINTER. 
iGET THE START ADDRESS OF 'HE Ql^UE . 
iSEE rr THE POINTER HAS MOVED FROM THE BASE. 
iEXIT NO CODES IN THE QUEUE. 



TNUM •• TNUM • 1 

MOV OTNUM.TSTNUM 

MOV #-l.CTRLCF 

MOV BMPCOP.R? 

MOV ^MPCQB,R3 

CMP R2,R5 

BEQ 60$ 



1 THERE IS AT LEAST ONE BMP CODE IN THE CSUE'.t-;. REPORT THE ERROR. 



I 



jREPORT ERROR BMP CODE FOUND IN TEST NN. BMP CODE :NNNNNN'* 



01^701 0H354 

lO*455 
0?3U^5 
OIK^OO 
015176 



MOV 
ERRDF 



^M9504,R1 iPASS THE FIRST MESSAGE TO BE REORTEO, 
9301.EM9301,ER9501 i ii>>i ERROR 09301 <<<i< 

TRAP 
.WOWO 
.WORD 
.WORD 



C$ERD^ 
9501 
EM9501 
ER9501 



055140 01276/ 002412 145242 
005067 145076 



60 » 



MOV 

CLR 
ENOTST 



^HMPCQB.BMPCQP 
CTRLCF 



104401 



I SET POINTER BACK TO THE HEGINING OF THE QUE. 
jlNOICATE THAT Wt ARE NUT WITHIN A TEST. 

L 10051; 



TRAP 



C$ETST 



l-i 1 (, 



c;dhvbo 

RARDWARl 


DHU 11 


^UNC TST 


PART2 MACRO h 


TfcST 




- RtPBMP ■ 


80tt; 








8068 








80^'> 








60^0 








80^1 








80 ; J 








SO/'K 








80 ; 4 








80.". 








80 76 








80/; 








80/8 








80.*^ 








8080 








8081 








808*^ 


05M^4 








O^^l^A 


000022 






03S156 






8085 








8095 








8094 


05S156 








05blS6 


00OO31 






055160 


055222 






05bl6^ 


160000 






05Mfc4 


177776 




809S 








809<) 


05'3l'.'. 








05M0 


f 01051 






oi': i , 


055240 






05M <.: 


000040 






05^1 ;4 


000776 




80'i 








8098 


0' )176 








05Sl?6 


002052 






05S?00 


055275 






5V0? 


17777; 






055204 


000000 






05S?06 


177777 




Hv»9*) 








8100 


OS5.U0 








O55J10 


0050^2 






055212 


055521 






055214 


0005 7/ 






055216 


00000 I 






055220 


000002 




8101 








810.^ 








8105 


055222 
055222 






8104 








8111 








aiia 


0^5222 


105 


125 122 




0'>5225 


040 


101 104 




5'.250 


104 


12i' 105 




0552M 


125 


12 5 07^3 




035^3b 


OAO 


000 
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.BBTTL HARDWARE PARAMETER CODING SECTION 



THE HARDWARE PARAMETER COOING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P- TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARh 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THt 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 



SEQ 201 



BGNHRD 



;DEVICE CSR ADDRESS QUESTION: 



L«HARD 



GPRMA HWPTQl.O.O. 160000, 177776. rES 



iDEVlCE INTERRUPT VECTOR QUESTION: 

GPRMA HWPTU2.2.0.40.V76.YtS 



lACTIVE LINES BIT MAP QLiESTION: 

GPRMD HWPTQ3.4,0.MAPLNS,O, 177777. YES 



I TYPE or L00P8ACK QUSTION: 

GPRMD HWPTQ4.6,0,577.1,2,YES 



FNDHRD 



HWPTQli .AiiCU /C5R ADDRESS: ^ 



L 10052 



.WORD L10O52-L$HAR0/2 



.WORD 


TiCODE 


.WORD 


HUPTQl 


.WORD 


TtlOl IH 


.WORD 


TJHILIM 


.UORD 


T$CODF 


.WORD 


HWPTQ2 


.WORD 


T$L0LIM 


.WORD 


T$HH IM 


.WORD 


TiCOOt 


.WORD 


HUPTQ5 


.WORD 


MAPLNS 


.WORD 


TiLOLIM 


. WORD 


TJHILIM 


.WORD 


TJCODt 


.UORD 


HUPTQ4 


.UORD 


5 7' 


.WORD 


T$1,!JL IM 


.WORD 


T$HXLIM 



.EVEN 



I-1 1 i 



C/DHVBO OMli U K>NC TST PART:? MACRO MiaOO 
HARDWARE PARAMETER COOING SCCTION 



t^ll5 05S^40 


HI 


110 


124 


C55?45 


105 


122 


122 


055246 


125 


120 


124 


055251 


O40 


126 


105 


055254 


103 


124 


117 


055257 


122 


040 


101 


055^'t)J 


104 


104 


122 


055265 


105 


125 


125 


055270 


0/2 


040 


000 


8114 0552/5 


101 


105 


124 


055276 


HI 


126 


105 


055501 


040 


114 


111 


055504 


116 


105 


040 


055507 


102 


HI 


124 


0^5512 


040 


115 


101 


055515 


120 


072 


040 


05532O 


000 






8115 055521 


124 


151 


120 


055524 


105 


040 


117 


05552/ 


106 


040 


114 


055552 


117 


11/ 


120 


055355 


102 


101 


105 


035540 


113 


040 


050 


055545 


061 


075 


111 


C55546 


116 


124 


105 


055551 


122 


116 


101 


055554 


114 


054 


040 


05555/ 


062 


0/5 


110 


055562 


063 


060 


062 


055565 


O/l 


040 


11/ 


0555/0 


122 


040 


110 


0555/5 


065 


062 


06/ 


0555/6 


06/ 


051 


072 


035401 


000 






811*. 








till7 
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HWPTQ2! .ASCI/ /INTERRUPT VECTOR A00RES5: / 



SEQ 202 



HWPTQ3! .ASCIZ /ACTIVE LINE BIT MAP; / 



HWPTQ4! .ASCIZ /TYPE OF LOOPBACK (1»1NTERNAL, 2-H3029 OR H327/);/ 



.EVEN 



1 1 i: 



J 



C/DHVUO DHU n FUNC TST PARTP li 
HAROWARt PARAMtTER CODING StCTXON 
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SEQ ^03 



(^1J6 










»KV 










ei^rt 










81c^9 










A150 










8151 










815.'^ 










ai33 










8134 










8135 










8136 










813/ 










H138 










8139 


03540P 
055402 
035404 


000014 






8140 










8149 










8150 


035404 
055404 
035406 
035410 


000150 
035434 
000020 






8151 










815? 


035412 
055412 
055414 
035416 


OCOl' J 
03551'^ 
000100 






815? 










8154 










8155 










8156 


0554.^0 
035420 


006044 






HIS/ 










8158 










8159 


055422 
0554 .<2 
0^5424 
035426 
0354 50 
03543i? 


001052 
035545 
1/77/7 
OOOOOO 
17777V 






8160 










8161 










816.-^ 










8165 


0354 54 
0354 34 








8164 










8n.5 










81 ya 


0554 34 


122 


105 


120 




03543/ 


IW 


122 


l<'4 




035442 


040 


125 


116 




035445 


111 


124 


040 




35450 


116 


125 


115 




05545 3 


102 


105 


122 




035456 


040 


101 


125 




035461 


040 


105 


101 




035464 


103 


110 


040 



.SBTTL SOFTWARE PARAMETER CODING SECTION 



THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P- TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 



BGNSFT 



jUNIT NUMBER PRINTOUT QUESTION; 
GPRML SWPTQl, 0.20. YES 



lEXTENDED ERROR REPORTING QUESTION: 
GPRML SWPTQ2,0»100,YES 



L$SOFT: 



.WORD L10053-L$S0FT/2 



.WORD 
.WORD 
.WORD 



.WORD 
.WORD 
.WORD 



T J CODE 
SWPTUl 
20 



TiCODE 



100 



i IF EXTENDED ERROR REPORTING IS NOT REQUIRED THEN SKIP THE NEXT QUESTION. 
XFERF ENDD 



.WORD T*CODE 



jNUMBER OF INDIVIDUAL DATA ERRORS TO REfORt ON A LINE QUESTION; 
GPRMO SWPTQ3,2.D.1■^^^^^0, 17/77 7, YES 



.WORD 


TJCODE 


.W0«0 


SWPTQ3 


.WORD 


1 / / ; / / 


.WORD 


TUOl im 


.WORD 


T$HILIM 



ENDD: 



.EVEN 
ENOSFT 



1.1005 3: 



.EVEN 



SWPTQl; .ASCI/ /REPORT UNIT NUMBER AS EACH UNIT 15 TESTED: 



C/OHVBO OHU U ^UNC TST PART? MACRO M1200 
SOFTWARE PARAMETER COOING SECTION 



Jib 
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SEQ ^04 



tfl73 



6174 



ttlVb 



055467 
055472 
0554 75 
055500 
035505 
055506 
055510 
055515 
05551b 
055521 
055524 
05552/ 
055552 
055555 
055540 
055545 
055546 
055551 
055554 
055557 
055562 
055565 
0355/0 
0555/5 
0555/6 
055601 
055604 
05560/ 
055612 
(.'55615 
05t>620 
055625 
055626 
035631 



125 
124 
125 
105 
105 
040 
105 
105 
105 
105 
117 
122 
117 
111 
072 
116 
102 
040 
040 
104 
111 
101 
104 
101 
122 
122 
124 
122 
11/ 
040 
040 
114 
105 
000 



116 
040 
040 
125 
104 
000 
150 
116 
104 
122 
122 
105 
122 
116 
040 
125 
105 
117 
HI 
HI 
104 
114 
101 
040 
122 
123 
11/ 
105 
122 
11/ 
101 
111 
072 



111 
111 
124 
124 
072 

124 
104 
040 
122 
040 
120 
124 
107 
000 
115 
122 
106 
116 
126 
125 
040 
124 
105 
11/ 
040 
040 
120 
124 
116 
040 
116 
040 



SWPTQ2: .ASCIZ /EXTENDED ERROR REPORTING! / 



SWPTQ3: .ASCI^ /NUMBER OF INDIVIDUAL DATA ERRURS TO RtPURT ON A LINEi / 



.tVEN 



K16 

I^^DHVBQ DHti U fUNC TST PARTP MACRO H1200 15-MAR-84 09!i>8 PAGE 127 
SOFTWARt PARAMtTER COOlNG StCTION 



SEQ aOb 



8184 

818S 
8186 
8187 
8188 
819^ 
8196 
819; 
8198 
8199 



8:?oo 

8^01 
820?. 

8:?04 

8?0h 
820 r 
8208 



035632 
035632 



$PATCH! : 



.BLKW 24 



035702 

055/02 
035704 
035706 
035706 



LASTAD 



000000 
000000 



EVEN 

WORD 
WORD 



LJLASTjt 



F.N0M0D 



000001 



.END 



:ZDHyBO DHU 11 TUNC TST PARTa 
iYMBOl. TABl.t 
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L16 

PAGE 127-1 



StQ 206 



ACTLNS 

ADR 

ADRPTH 

ALTFLD 

ASLNTL 

ASSEMB- 

BCOUNl 

BITTDL 

BITO - 

BITOO ■■' 

BITOl ■ 

BITOa ' 

BIT03 ' 

BiT04 " 

BIT05 = 

BIT06 - 

BIT07 ' 

BIT08 

Bn09 " 

BITl ^ 

BITIO ' 

BITll ' 

BIT12 ' 

BIT13 = 

BIT14 = 

BITIS ^ 

BIT2 ' 

BIT5 ' 

BIT4 = 

BITS = 

BIT6 = 

BIT? = 

BIT8 ^ 

BITS 

Bh^CQB 

BMPCQE 

BMPCQP 

BOE 

BRLEVL 

BlTBAS 

Bl^TENO 

BUTMIO 

Bl>PTR 

BUfSQT 

CALMSL 

CHKBHP 

CKRXTM 

CKTWAP 

CIJ<BRL 

CLKCSR 

CLKHR/ 

CLKINT 

Cl.'< A-.C 

CIK^ST 

C ■•':; 
L'-^RU 



G 
G 
G 
G 
G 



003220 

000020 

014200 

015370 

013442 

000010 

002322 

002336 

000001 

000001 

000002 G 

000004 G 

000010 

000020 

000040 

000100 G 

000200 G 

OOC ■" 

OOlOv. 

OOOOC? 

002000 

004000 

010000 

020000 

040000 

lOOOOO 

000004 

0000 10 

000020 

000040 

000100 

000200 

000400 

001000 

002412 

002612 

002410 G 

000400 (i 

002225 I. 

002650 G 

003650 G 

005250 

002246 

005450 

013552 G 

013776 G 

014046 

014166 

002306 

002304 '} 

002312 L- 

017632 G 

002310 

014216 

014240 
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